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INTRODUCTION 


These  programs  present  the  user  of  the  HP-41  hand-held,  pro- 
gramable  calculator  with  a  series  of  self-prompting,  alphanumeric 
programs  that  can  be  used  with  acceptable  results  to  compute  and 
evaluate  helicopter  performance.  Most  of  the  programs  are 
stuctured  so  as  to  be  more  expedient  when  doing  preliminary  heli¬ 
copter  design  where  intermediate  values  are  of  less  a  concern 
than  would  be  the  case  when  studying  detailed  performance.  _ 

By  presenting  only  the  principal,  'bottom  line',  values,  the 
programs  are  shorter  than  if  all  of  the  intermediate  values  were 
displayed.  However,  with  the  establishment  of  a  standard  storage 
register  routine  (see  Tables  I  and  II),  any  intermediate  value 
may  be  readily  located  and  displayed  by  using  the  RCL  routine. 

The  standard  storage  registers  also  permit  direct  loading  of 
data  from  a  mass  storage  unit  such  as  the  HP  82161A  Digital 
Cassette  Drive. 

The  basic  equations  and  assumptions  inherent  in  these  pro¬ 
grams  are  from  "Helicopter  Performance"  (reference  1)  and  "Heli¬ 
copter  Design  Manual  (reference  2),  both  by  Professor  Donald  M. 
Layton.  These  materials  are  used  regularly  in  helicopter  perform¬ 
ance  and  design  courses  at  the  Naval  Postgraduate  School, 
Monterey,  California. 

The  programs  have  been  written  in  a  consolidated  manner, 
thus  reducing  the  need  to  load  numerous  individual  subroutines  in 
order  to  run  a  single  program.  Because  of  this,  many  of  the  pro¬ 
grams  are  quite  large  and  use  a  considerable  amount  of  the  avail¬ 
able  space  in  the  resident  memory  of  the  HP-41CV.  If  a  HP-41C  is 
to  be  used  a  Quad  Memory  Module  is  required.  The  option  to  oper¬ 
ate  a  specific  subroutine  is  maintained  for  most  of  the  programs. 
For  example,  if  one  desired  to  ascertain  the  induced  velocity  of 
the  main  rotor,  once  data  parameters  are  loaded,  that  information 
could  be  gained  by  executing  that  subroutine,  e.g. ,  XEQ  VI. 

Table  III  is  a  matrix  of  program  input  parameters  and  pro¬ 
grams.  Until  the  user  of  these  programs  becomes  quite  conversant 
with  the  programs  inputs,  it  would  be  wise  to  check  Table  III 
prior  to  executing  a  program.  For  example,  the  POWER  program 
requires  an  input  of  Equivalent  Flat  Plate  Area,  and  if  the  drag 
information  is  available  only  in  the  form  of  Equivalent  Flat 
Plate  Loading,  the  data  must  be  converted  prior  inputing  FF. 

In  order  to  facilitate  partial  changes  of  data  input  sets, 
most  data  parameters  recall  the  existing  data  value  prior  to 
asking  the  prompt  question.  This  permits  the  maintenance  of  the 
same  data  value  by  either  re-entering  the  value  or  pressing  R/S. 
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Each  program  is  documented  in  essentially  the  same  manner. 
Listed  alphabetically,  each  program  documentation  begins  with  the 
name  of  the  program  (as  it  appears  in  the  execute  statement)  and 
a  short  phrase  that  describes  the  program.  This  is  followed  by 
the  introduction  which  states  the  purpose  of  the  program,  ex¬ 
plains  the  applicability  of  the  program,  and  describes  any 
assumptions  inherent  in  the  program. 

For  a  program  which  requires  the  loading  of  additional  pro¬ 
grams  for  execution,  an  entry  following  the  introduction  indi¬ 
cates  the  required  programs..  This  is,  in  turn,  followed  by  a 
listing  of  the  equations  used  in  the  program,  together  with  the 
source  of  each  equation. 

An  example  problem,  executed  with  detailed  step-by-step  in¬ 
structions,  is  furnished  with  each  program.  These  instructions 
indicate  the  inputs  required  to  be  made  by  the  user,  functions 
that  the  user  must  execute  and  displays  as  they  would  appear  on 
the  HP-41.  For  those  program  where  multiple  internal  branching 
occurs,  either  a  representative  branch  is  shown  or  all  branches 
are  demonstrated.  For  the  latter  case,  indices,  such  as  A  or  B, 
follow  the  appropriate  step  number. 

Within  the  detailed  instructions,  the  user  will  be  prompted 
for  two  types  of  inputs.  The  first,  and  more  predominant  type, 
occurs  when  a  numerical  input  is  required  by  the  program.  This 
type  of  prompt  will  have  the  data  variable  followed  by  an  equal¬ 
ity  sign  and  a  question  mark,  e.g.  VF=? .  The  other  type  of  prompt 
occurs  at  branch  points  where  a  question  is  asked,  the  answer  to 
which  is  either  Yes  or  No.  These  prompts  consist  of  a  symbol, 
word  or  short  phrase  followed  only  by  a  question  mark,  e.g.,  NEED 
DATA?.  If  the  answer  to  this  type  of  prompt  is  Yes,  enter  1,  and 
if  the  answer  is  No,  enter  0. 

The  last  documentation  of  each  program  is  a  complete  listing 
of  the  program.  This  permits  the  user  to  see  how  and  why  the  pro¬ 
gram  arrives  at  its  solutions.  It  also  allows  for  editing,  should 
adjustments  be  desired.  Although  the  programs  have  been  written 
in  a  straight-forward  manner,  some  combination  of  constants  have 
been  used.  While  this  shortens  the  program,  it  does  add  confusion 
to  any  editing  of  the  program. 

The  backbone  of  these  programs  for  performance  determination 
is  the  program  POWER.  In  may  instances,  this  program  is  required 
to  be  loaded  and  run  in  conjunction  with  another  program.  For 
example,  the  highspeed  effects  program,  HSE,  makes  power  cor¬ 
rections  to  the  basic  POWER  program. 


A  program.  FLITE,  that  is  somewhat  similar  to  POWER  is  also 
included  for  two  reasons.  First  of  all,  there  are  provisions  in 
this  program  for  non-rectangular  rotor  blades.  This  capability 
was  not  incorporated  in  POWER  due  to  the  size  of  the  program. 
Secondly,  FLITE  can  be  used  for  partial,  en-route  solutions  such 
as  main  rotor  only,  tail  rotor  only,  or  individual  subroutines. 

These  programs  are  all  written  in  British  Units.  If  it  is 
desired  to  convert  to  SI  Units  it  is  only  necessary  to  modify  the 
aerodynamic  parameters  (such  as  density)  and  to  make  the  proper 
conversionfor  power.  For  example,  if  the  density  for  Profile 
Power  is  input  as  kg-sec^/m4  and  all  of  the  measurements  are  in 
meters,  to  obtain  horsepower  from  kg-m/sec,  divide  by  76,  vice 
550  as  with  British  units.  The  author  has  available  a  set  of 
these  programs  in  SI  Units. 

These  programs  have  been  prepared,  revised,  modified  and 
edited  over  a  several  years  with  the  assistance  of  students  in 
the  Aeronautics  Programs  at  the  Naval  Postgraduate  School. 
Although  their  contributions  are  deeply  appreciated,  the  list  of 
these  students  has  now  grown  so  long  as  to  make  a  complete 
acknowledgement  impractical. 
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TABLE  I 

STANDARD  STORAGE  REGISTER  UTILIZATION 

Stored  Quantity 

R  -  Main  rotor  radius  (ft) 

c  -  Main  rotor  equivalent  chord  (ft) 

RV  -  Main  rotor  rotational  velocity  (Rad/sec) 

Cd  -  Main  rotor  profile  drag  coefficient 
o 

b  -  Number  of  main  rotor  blades 

R<TR>  -  Tail  rotor  radius  (ft) 

c<TR>  -Tail  rotor  equivalent  chord  (ft) 

RV<TR>  -  Tail  rotor  rotational  velocity  (rad/sec) 

Cd  <TR>  -  Tail  rotor  profile  drag  coefficient 
o 

b<TR>  -  Number  of  tail  rotor  blades 
L  -  Length  of  tail  boom  (ft) 

W  -  Gross  weight  (lbs) 

FF  -  For.  flight  Equivalent  Flat  Plate  Area  (ft2) 

FV  -  Vert.  Equivalent  Flat  Plate  Area  (ft2) 

RTR  HT  -  Main  rotor  height  above  skid/wheel  (ft) 

c  -  Root  chord  of  main  rotor  (ft) 
o 

-  Tip  chord  of  main  rotor  (ft) 

a  CHORD  -  Main  rotor  span  fraction  (for  taper) 

VF  -  Forward  velocity  of  aircraft  (ft/sec) 
(Entered  in  kts,  stored  in  ft/sec) 

VV(FPM)  -  Vertical  velocity  of  aircraft  (ft/sec) 
(Entered  in  ft/min,  stored  in  ft/sec)) 

PA/DA  -  Pressure  or  Density  Altitude  (ft) 
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TEMP<F>  -  Temperature  in  Rankine 
(Entered  in  °F,  stored  in  °R)) 

Density  (p )  -  Ambient  density  (slugs/ft^) 

2 

Area  -  Main  rotor  disc  area  (ft  ) 

2 

Area<TR>  -  Tail  rotor  disc  area  (ft  ) 

SKID  HT  -  Height  of  skids  (wheels)  above  the 
ground  (ft) 

h/D  ratio  -  Ratio  of  rotor  height  to  diameter 

VT  -  Main  rotor  tip  velocity  (ft/sec) 

TT<TR>  -  Tail  rotor  tip  velocity  (ft/sec) 

CT  -  Main  rotor  coefficient  of  thrust 

C,p<TR>  -  Tail  rotor  coefficient  of  thrust 

VI  -  Main  rotor  induced  velocity  (ft/sec) 

VI <TR>  -  Tail  rotor  induced  velocity  (ft/sec) 

B  -  Main  rotor  tip  loss  factor 

B<TR>  -  Tail  rotor  tip  loss  factor 

PI  -  Main  rotor  induced  power  (includes  tip  loss 
and  ground  effect)  (SHP) 

PO  -  Main  rotor  profile  power  (SHP) 

PP  -  Main  rotor  parasite  power 

PC  -  Main  rotor  climb  power  (SHP) 

PT<MR>  -  Main  rotor  total  power  (SHP) 

T<TR>  -  Tail  rotor  thrust  (lbs) 

PI<TR>  -  Tail  rotor  induced  power  (includes  tip 
loss)  (SHP) 

PO<TR>  -  Tail  rotor  profile  power  (SHP) 

PT<TR>  -  Tail  rotor  total  power  (SHP) 

PT<AC>  -  Aircraft  total  power  required  (SHP) 
PI/PInrp  -  Ground  effect  induced  power  ratio 


TABLE  II 


STANDARD  STORAGE  REGISTER  UTILIZATION 

Storage 

Stored  Quantity  Register 

a  CHORD  -  Main  rotor  span  fraction  17 

2 

Area  -  Main  rotor  disc  area  (ft  )  23 

2 

Area<TR>  -  Tail  rotor  disc  area  (ft  )  24 

b  -  Number  of  main  rotor  blades  04 

b<TR>  -  Number  of  tail  rotor  blades  09 

B  -  Main  rotor  tip  loss  factor  33 

B<TR>  -Tail  rotor  tip  loss  factor  34 

c  -  Main  rotor  equivalent  chord  (ft)  01 

c<TR>  -  Tail  rotor  chord  (ft)  06 

C,  -  Main  rotor  average  profile  drag  coefficient  03 

ao 

Cd  <TR >  -  Tail  rotor  profile  drag  coefficient  08 

o 

Cg  -  Main  rotor  root  chord  (ft)  15 

c^  -  Main  rotor  tip  chord  (ft)  16 

CT  -  Main  rotor  coefficient  of  thrust  29 

CT<TR>  -  Tail  rotor  coefficient  of  thrust  30 

3 

Density  (P )  -  Ambient  density  { slugs/ft  )  22 

2 

FF  -  For.  Flight  Equivalent  Flat  Plate  Area  (ft  )  12 

o 

FV  -  Vert.  Equivalent  Flat  Plate  Area  (ft  )  13 

h/D  -  Rotor  height  to  rotor  diameter  ratio  26 

L  -  Tail  boom  length  (ft)  10 

PA/DA  -  Pressure  or  density  altitude  (ft)  20 

PC  -  Main  rotor  climb  power  (SHP) 
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38 


35 


PI  -  Main  rotor  induced  power  (includes  tip  loss  and 
ground  effect)  (SHP) 

PI<TR>  -  Tail  rotor  induced  power  (includes  tip  loss) (SHP)  41 

PI/PIQGE  -  Induced  power  ground  effect  ratio  45 

PO  -  Main  rotor  profile  power  (SHP)  36 

PO<TR>  Tail  rotor  profile  power  (SHP)  42 

PP  -  Main  rotor  parasite  power  (SHP)  36 

PT<AC>  -  Total  aircraft  power  required  (SHP)  44 

PT<MR>  -  Main  rotor  total  power  required  (SHP)  39 

PT<TR>  -  Tail  rotor  total  power  required  (SHP)  42 

R  -  Main  rotor  radius  (ft)  00 

R<TR>  -  Tail  rotor  radius  (ft)  05 

RTR  HT  -  Main  rotor  height  abopve  skids/wheels  (ft)  14 

RV  -  Main  rotor  rotational  velocity  (rad/sec)  02 

RV<TR>  -  Tail  rotor  rotational  velocity  (rad/sec)  07 

SKID  HT  -  Height  of  skids/wheels  above  ground  (ft)  25 

T<TR>  -  Tail  rotor  thrust  (lbs)  40 

TEMP<F>  -  Temperature  (entered  in  °F,  stored  in  °R)  21 

VT  -  Main  rotor  tip  velocity  (ft/sec)  27 

Vt<TR>  -  Tail  rotor  tip  velocity  (ft/sec)  28 

VF  -  Forward  velocity  (enter  in  kts,  stored  in  ft/sec)  18 

VI  -  Main  rotor  induced  velocity  (ft/sec)  31 

VI <TR>  -  Tail  rotor  induced  power  (ft/sec)  32 

VV<FPM>  -  Vertical  velocity  (Enter  in  ft/min,  stored  19 

in  ft/sec) 

W  -  Gross  weight  (lbs)  11 


TABLE  III 

PROGRAM  INPUT  REQUIREMENTS 


a  CHORD 
ALPHA  HAT 
b 

b<TR> 

BETA  HAT 
c 

CARGO 
CL  <RAD> 
C<  TR  > 

C, 


C,  <TR> 
do 


a 

os 

o 

E-i 

D 

w 

E-' 

O 

M 

W 

U 

s 

PS 

►U 

•J 

D 

cn 

o 

a 

w 

s 

< 

u 

Cm 

Cm 

as 

Cu 

os 

> 

> 

1 

ENG  WT 
FF 

FUEL  WT 
FV 
I  NCR 

( Velocity ) 
L 

NENG 

PA/DA 


X  X 


kts 

( ft/sec ) 


*  Stored  Quantity 


PEOPLE 


x 


PERSON  WT 

PSHP 

PT<AC> 

RSHP<SSL> 

R 

R<TR> 

RTR<HT> 

RV 

RV<TR> 
SKID  HT 
T<TR> 

TEMP  <F> 

TRAN  WT 

TWIST 

VF 

V-START 

V-STOP 

VV 

W 


X  lb 

x  shp 

x  shp 

x  x  shp 


X 

X 

X 

X 

X  ft 

X 

X 

ft 

X 

X 

ft 

X 

X 

X 

X 

x  rad/sec 

X 

X 

rad/sec 

X 

X 

ft 

lbsf 

X 

X 

°F 

( °R )  * 

lbs 

X 

deg 

X 

X 

X 

X 

X  X 

kts 

( ft/sec ) * 

xx  kts 

(ft/sec ) * 

x  x  kts 

( ft/sec) * 

x  x  ft/min 

( ft/ sec ) * 

X  x  X  x  X  lbs 


*  Stored  Quantity 


AUTO 


(Autorotation) 

Introduction:  This  program  computes  approximations  for 
both  mimimum  rate  of  descent  vertical  autorotation 
and  minimum  descent  rate  forward  autorotation.  It 
uses  the  standard  input  registers,  and  if  data  is 
required,  all  parameters  are  requested,  even  though 
only  a  few  are  needed. 

ADDITIONAL  PROGRAMS  REQUIRED:  None 

Equations 


Ref  1,  Eqn  6-14 
Ref  1,  Eqn  6-15 
Ref  1,  Eqn  6-8 
Ref  1,  Eqn  6-11 
Ref  1,  Eqn  5-9 

Ref  1,  Eqn  6-10 


y  .  „  =  0.00867  ♦  R  •  RPM  Kef  1,  Eqn  6-17 

ftmin  ROD) 


Vv(min  ROD)  =  °*251  *  R  *  RPM 

_h _ 

^(hor  glide)  tany 
V,r 

Y  =  arcs  in  —  -  16.6° 

V  c 


Ref  1,  Eqn  6-18 


Ref  1,  Eqn  6-19 


Ref  1,  Eqn  6-20 
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where 


is  the  average  coefficient  of  lift 

Cd  is  the  average  coefficient  of  drag 

Kx  is  a  real  number  coefficient  called  the  lift 

coefficient  multiplier  in  drag  coefficient  terms 

K ,  is  a  real  number  coefficient  eaual  to  Cj 
2  '  do 

Vv  is  the  vertical  velocity  in  a  vertical  autorota¬ 
tion  (ft/min) 

Ap  is  the  area  of  the  rotor  disc  (ft2) 
a  is  the  solidity  of  the  main  rotor  system 
p  is  the  density  of  the  air 

h  is  the  height  of  the  rotor  system  above  the 
ground  (ft) 

RPM  is  the  rotational  velocity  of  the  main  rotor 
system  in  revolutions/minute 
F  is  a  non-dimensional  coefficient 

f  is  a  non-dimensional  coefficient 

W  is  the  weight  of  the  helicopter  (lbs) 

R  is  the  radius  of  the  rotor  system  (ft) 

y  is  the  descent  angle  for  minimum  descent 
rate  (degrees) 
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w= 


vertical  velocity  in  a  vertical  autoro¬ 
tation  (ft/min) 

VF(MIN.R.O.D. ) =  forward  autorotative  flight  velocity  for 

minimum  autorotative  rate  of  descent  (kts) 

W (MIN. R.O .D . ) =  vertical  autorotative  velocity  (ft/min) 

at  the  forward  autorotative  flight  veloc¬ 
ity  for  minimum  autorotative  rate  of 
descent 

d (HOR. GLIDE) =  horizontal  distance  travelled  on  the 

ground  at  the  forward  autorotative  flight 
velocity  for  minimum  rate  of  descent  (ft) 


AUTO 


SIZE  060 


INSTRUCTIONS 

INPUT 

FUNCTION 

DISPLAy 

1.  Initialize  the  program 

XEQ  AUTO 

NEED  DATA? 

2  Answer  1  for  yes, 

0  for  no 

1 

R/S 

W=? 

3.  Input  weight  (lbs) 

20000 

R/S 

RV=? 

4.  Input  main  rotor 

rotational  velocity 
( rad/sec) 

27 

R/S 

b=? 

5.  Input  number  of  main 
rotor  blades 

4 

R/S 

c=? 

6.  Input  main  rotor 
chord  (ft) 

1.75 

R/S 

CdO=? 

7.  Input  main  rotor  drag 

coefficient  ; 

.008 

R/S 

R=? 

8.  Input  main  rotor 
radius  (ft) 

| 

26.8 

R/S 

FF=? 

9.  Input  forward  flat 
plate  area  ( sq  ft) 

25.7 

R/S 

FV=? 

10.  Input  vertical  flat 
plate  area  ( sq  ft) 

30.8 

R/S 

RV(TR)=? 

11.  Input  tail  rotor 

rotational  velocity 
( rad/sec) 

124.6 

R/S 

b (TR ) =? 

12.  Input  number  of  tail 
rotor  blades 

4 

i 

R/S 

c (TR )=? 

13.  Input  tail  rotor 
chord  ( f t ) 

.81 

R/S 

CdO ( TR ) =? 

14.  Input  tail  rotor 
chord  (ft) 

.008 

R/S 

R ( TR ) =? 

15.  Input  tail  rotor 
radius  (ft) 

5.5 

R/S 

L ( TAIL ) =? 

AUTO 


INSTRUCTIONS 

INPUT 

FUNCTION 

DISPLAY 

16.  Input  length  of  tail 
(ft) 

31.5 

R/S 

RTR  HT=? 

17.  Input  rotor  height 
above  skids  (ft) 

10 

R/S 

SKID  HT=? 

18.  Input  skid  height 
above  ground  (ft) 

4000 

R/S 

LCM=? 

19.  Input  lift  coefficient 
multiplier  (Kl) 

.004 

R/S 

w= 

20.  Outputs  vertical  velocity 
in  vertical  autorotative 
( f t/min) 

0 

R/S 

VF ( MIN  ROD ) — 

21.  Outputs  flight  velocity 
for  minimum  rate  of 
descent  (kts) 

59.9 

R/S 

W (MIN  ROD)* 

22.  Outputs  vertical  velocity 
at  minimum  rate  of 
descent  (ft/min) 

1816.3 

R/S 

d ( HOR  GLIDE ) = 

23.  Outputs  horizontal 

distance  at  minimum  rate 
of  descent  (ft) 

6092.7 

01  ♦LBL  -ROTO- 

51  STO  06 

181  PI 

02  FIX  1 

52  RCL  88 

102  / 

83  CF  02 

53  -CdO<TR>=’* 

183  4 

04  -NEED  DfiTfl7’ 

54  PROMPT 

104  / 

85  PROMPT 

55  8 

105  STO  48 

06  X=8? 

56  RCL  85 

106  X<09 

87  GTO  -PGM’ 

57  “R<TR>=?“ 

107  GTO  81 

08  RCL  11 

58  PROHPT 

108  1 

09  ■«=?“ 

59  STO  85 

189  - 

10  PROMPT 

68  RCL  10 

110  •X>0?‘ 

11  STO  11 

61  “L<TflIL>=?- 

111  GTO  82 

12  RCL  02 

62  PROMPT 

112  2 

13  "RV-?" 

63  STO  10 

113  + 

14  PROMPT 

64  RCL  14 

114  Xt2 

15  STO  02 

65  -RTR  HT=?" 

115  1/X 

16  RCL  04 

66  PROMPT 

116  RCL  48 

17  ‘b=?‘ 

67  STO  14 

117  * 

18  PROMPT 

68  -SKID  HT=?“ 

118  GTO  03 

19  STO  84 

69  PROMPT 

119*L8L  82 

20  RCL  01 

78  STO  25 

120  RCL  48 

21  "c=?“ 

71*LBL  -PGM- 

121  3 

22  PROMPT 

72  “LCM=?“ 

122  * 

23  STO  @1 

73  PROMPT 

123  SORT 

24  PCL  83 

74  STO  46 

124  CHS 

25  *CdO=?* 

?5*L8L  -fll* 

125  RCL  48 

26  PROHPT 

76  RCL  46 

126  2 

27  STO  83 

77  1/X 

127  * 

28  RCL  08 

78  3 

128  + 

29  -R=?" 

79  * 

129  RCL  48 

38  PROMPT 

88  RCL  @3 

138  4 

31  STO  08 

81  * 

131  * 

32  RCL  12 

82  SORT 

132  3 

33  -FF=?" 

83  STO  47 

133  - 

34  PROMPT 

84  Xt2 

134  / 

35  STO  12 

85  RCL  46 

135  RCL  48 

36  RCL  13 

86  * 

136  6.875  E-6 

37  -FV=?- 

87  RCL  83 

137  * 

38  PROMPT 

88  + 

138  1 

39  STO  13 

39  XT2 

139  + 

40  RCL  87 

98  1/X 

140  4.2561 

4|  -pv<TR>=’- 

91  RCL  47 

141  YTX 

42  PROMPT 

92  3 

142  .8023769 

43  STO  87 

93  YTX 

143  * 

44  RCL  89 

94  * 

144  * 

45  -baR>=?‘ 

95  RCL  84 

145  RCL  08 

46  PROMPT 

96  * 

146  Xt2 

47  STO  09 

97  PCL  01 

147  * 

48  RCL  06 

98  * 

148  PI 

49  *C<TR>=?* 

99  RCL  08 

149  * 

58  PROMPT 

100  / 

150  2 

1 5 1  * 

152  1/X 

153  PCI  11 

154  * 

155  SORT 

156  60 

157  * 

158  -VV=- 

159  PROMPT 
168  VIEW  X 

161  STOP 

162  RCL  02 

163  RCL  08 

164  * 

165  .082798 

166  * 

167  -VF<HIN,R,0,D> 

168  PROMPT 

169  VIEW  X 

170  STOP 

171  38.3158 

172  * 

173  -VV<HIN.R.O.B> 

174  PROMPT 

175  VIEW  X 

176  STOP 

177  -OLT<FT>='>- 

178  STO  25 

179  .29811 

180  / 

181  -d<HOR.GLIBE>= 

182  PROMPT 

183  VIEW  X 

184  STOP 

185  GTO  04 
136*181  01 

187  *F=" 

188  flRCL  X 

189  HVIEW 
198*L6L  84 
191  END 


Helicopter  Hover,  Service  and  Combat  Ceilings 


Introduction:  This  program  will  determine  the  hover,  service 
and  combat  ceilings  for  a  helicopter.  It  is  run  in 
conjunction  with  POWER  (which  must  be  loaded  up  through 
and  including  step  19  of  the  step-by-step  instructions). 
For  the  three  different  .ceilings,  rates  of  climb  of  0,  100, 
and  500  feet  per  minute  are  imposed  upon  the  aircraft.  The 
power  is  computed  for  the  selected  airspeed  (0  for  hover)  and 
compared  with  the  maximum  rotor  shaft  horsepower  available. 
There  are  no  new  equations  utilized.  CLG  utilizes  the  same 
storage  registers  as  POWER  and  additionally  those  listed 
below. 

Additional  Programs  Required:  POWER 
Additional  Storage  Registers: 


Storage 

Registers  Quantity  Stored 

48  scratch 

58  RSHP(SSL)  -  maximum  rotor  shaft  horsepower 
available  at  standard  sea  level  conditions 


INSTRUCTION 


INPUT 


FUNCTION 


DISPLAY 


1.  Initialize  program 

XEQ  CLG 

2.  Reminder  flashes 

*L0AD  POWER* 

3.  Reminder  flashes 

HOVER  CLG? 

4.  Do  you  want  hover 

ceiling?  Input  1 
for  Yes 

1 

R/S 

RSHP ( SSL ) =? 

5.  Input  SSL  rotor 
shaft  horsepower 
available  (SHP) 

6.  Ouput  hover  ceiling 
( feet) 

2500 

R/S 

HOVER  CLG= 
3,770 

-  or  to  get  service  ceiling  - 


2. 

Do  you  want  hover 
ceiling?  Input  0 
for  No 

0 

R/S 

SERVICE  CLG? 

3. 

Do  you  want  service 
ceiling?  Input  1 
for  yes 

1 

R/S 

VF=? 

4. 

Input  forward 
velocity  (kts) 

90 

R/S 

RSHP ( SSL ) =? 

5. 

Input  SSL  rotor  shaft 
horsepower  available 
(SHP) 

2500 

R/S 

SERVICE  CLG= 
17543 

6. 

Output  service 
ceiling  (feet) 

i 

CLG 


-  Or  to  get  combat  ceiling 


INSTRUCTION 

INPUT 

DISPLAY 

3.  Do  you  want  service 

ceiling?  Input  o 
for  No 

1 

0 

R/S 

COMBAT  CLG? 

4.  Do  you  want  combat 

ceiling?  Input  1 
for  Yes 

1 

R/S 

VF=? 

5.  Input  forward 

velocity  (kts) 

90 

R/S 

RSHP ( SSL ) =? 

6.  Input  SSL  rotor  shaft 

horsepower  available 
( SHP ) 

2500 

R/S 

COMBAT  CLG= 
15758 

7. 


Ouput  combat  ceiling 
( feet) 


•14JL  *aG- 

82  ••UJfiB  POWER*- 

83  AVIEW 

84  PSE 
83  SE  83 

86  CF  86 

87  CF  87 

88  CF  88 

89  FIX  8 
18HJL  88 

u  -hover  ac?- 

12  PROMPT 

13  X=8? 

14  GTO  81 

15  SF  86 

16  8 

17  STO  18 

18  STO  19 

19  CTO  84 
20*LBL  81 

21  -SERVICE  aC?* 

22  PROHPT 

23  X=8? 

24  GTO  02 

25  SF  87 

26  GTO  03 
27*181  82 

28  *  COMBAT  CLIP- 

29  PROHPT 
38  X=8? 

31  GTO  80 

32  SF  88 
33H.BL  83 

34  *VF=?" 

35  PROHPT 

36  1.68389 

37  • 


38  STO  18 

39  FS?  07 
48  188 

41  FS?  88 

42  588 

43  ENTEBt 

44  68 

45  / 

46  STO  19 
•  47HJJL  84 

*48  *RSHP<SSl>*?* 
4$  PROHPT  - 
58  STO  58 

51  6561 

52  STO  48 

53  0 

54  STO  20 

55  ♦LSI  'DEL- 

56  RCl  28 

57  6.875  E-6 

58  * 

59  CHS 
68  1 
61  ♦ 

62  STO  55 

63  5.2561 

64  YtX 

65  STO  47 

66  Ra  53 

67  518.68 

68  * 

69  STO  21 
78  Ra  47 

71  Ra  55 

72  / 

73  .8823769 

74  * 


76  CF  02 

77  XEQ  -CT* 

78  Ra  55 

79  SORT 
88  Ra  47 
81  * 

82  Ra  58 

83  * 

84  Ra  44 

85  X>Y? 

86  GTO  85 

87  Ra  48 

88  ST*  28 

89  GTO  -DEL* 
98*LBL  85 

91  Ra  48 

92  ST-  28 

93  3 

94  / 

95  STO  48 
%  I 

97  x=r? 

98  GTO  -RHS* 

99  GTO  -DEL* 
180+lBL  -RHS* 

181  Ra  28 

182  1 
183  - 

104  FS?  06 

185  -HOVER  aG=- 

186  FS?  07 

107  -SERVICE  ao* 

108  FS?  98 

109  -COMBAT  CLO¬ 
US  ARa  X 

111  AVIEW 

112  STOP 


FLITE 

Basic  Power  Requirements 


Introduction:  The  user  inputs  the  basic  geometric  and  flight 

parameters  of  the  helicpter  and  the  program  determines  the 
steady  state  power  requirements  to  maintain  a  given  flight 
condition.  In  the  FLITE  program,  high  speed  effects  are 
neglected.  The  program  will  determine  the  power  required 
for  the  main  rotor  only,  or  for  the  main  rotor  plus  the 
tail  rotor.  The  user  must  input  whether  the  flight 

condition  is  hover  only,  forward  only,  vertical  only  or 
forward  and  vertical.  FLITE  utilizes  the  Standard  Data  Set 
for  storage  registers  00.  through  45,  and  the  non-standard 
registers  listed  in  Additional  Storage  Registers. 

To  execute  the  program  and  view  only  the  power 

results,  enter  XEQ  FLITE.  To  execute  the  program  and  view 

power  and  parameter  results,  enter  XEQ  FLITE+.  This  program 
is  also  written  so  that  each  parameter  may  be  calculated 
individually,  as  long  as  the  user  executes  DATA  first  (XEQ 
DATA),  or  the  data  is  already  in  the  proper  storage 
registers.  To  execute  the  individual  subroutine,  follow  the 
instructions  listed  in  Subroutines  to  Determine  Individual 
Parameters . 


Additional  Programs  Required:  None 


Equations 

A0  -  "R2 

Ref 

1, 

Eqn  2-36 

VT  =  fiR 

Ref 

1, 

Eqn  2-22 

u  =  vf/vT 

Ref 

1, 

Page  123 

CT  =  W/(pAVT2) 

Ref 

1, 

Eqn  2-23 

B  =  1  -  (2CT)*5/b 

Ref 

1, 

Eqn  3-1 

a  =  bc/TrR 

Ref 

1, 

Eqn  2-37 

cg  =  c^  +  .25(cq  -  c^Hl  -  a4)/)l  -  a) 

Ref 

1 1 

Page  55 

H  =  1  -  Hp-6.875*10“6) )5-2561/ 

Ref 

2, 

Page  55 

( ( T°F  -  32) *.555  +  273.16) 


H  =  1  -  (H  *288.16) *23496/6.875  *10-6  Ref  2,  Page  55 


.ul^iLn 


FLITE 

=  0.0023769  •(  1  -  6.875  *10“^  H  )4*2561 


/Pi 

IGE  1OGE 


59  •(  1  -  6.875  *10~q  Hp)  '“Di  Ref  2,  Page  55 

=  1276 ) h/D ) 4  +  .7070(h/D)3  Ref  1,  Eqn  3-8 


-  1. 4569 ( h/D) 
+  0.5147 


2  +  1.3434 (h/D) 


=  (W/2pAD)*5 

=  .5<-Vv  +  /vv  +  (4vi  )'5))‘5 
=  -Vf2/2  +  ((Vf2/2)2  +  v.  4)*5)5 


Ref  1,  Eqn  4-1 
Ref  1,  Eqn  4-13 
Ref  1,  Eqn  4-34 


=  v.  or  v.  or  v.  depending  on  flight  conitlon 
T  v  1Tv 

=  (Wvi)/(550)  Ref  1,  Eqr 


=  (Wv . ) / ( 550  »B) 

TL  1 

=  P  »(P  /P  ) 
(TL+GE)  1TL  IGE  *OGE 

=  oCd  pADVTJ  (1  +  4.3p  )/4400 

°  3  3 

=  .5p((VfJFf)  +  (VvJFv))/550 

=  (WVv)/550 

=  Pi  +  +  Pr,  + 

(TL+GE)  o  p  c 

—  Prp  /  ^^TIR 

(TR)  MR  UTR  iK 

tr)  “  1  -  <2CTTR),'5/hrR 

=  (PT  /  2  pA  dp  ...5 

h  ( TR )  MR  UTR  MR 


Ref  1,  Eqn  4-2 
Ref  1,  £qn  3-6 
Ref  1,  Eqn  4-3 
Ref  1,  4-53 
Ref  1,  Eqn  4-62 
Ref  1,  Eqn  4-62 
Ref  1,  Eqn  4-64 
Ref  1,  Page  145 

Ref  1,  Page  146 

Ref  1,  Eqn  5-8 


T  ( TR ) 


=  ( ( -Vf  / 2  + 


Ref  1,  Eqn  5-9 


(  (  V- 2/2 ) 


+  Vi 


h  (TR ) 


)  )  ‘  J) 


5  ,  .  5 


"  PT.,„  Vi 


/(Sin  •  550  ) 


(TL+GE) 


MR  T ( TR ) 
=  P,  /<Bmi 


550  ) 


Ref  1,  Eqn  5-11 


Ref  1,  Eqn  5-4 


FLITE 


PQ 

=  °cd 

pad  vt  (1 

(TR) 

o 

PT 

=  P. 

+  p 

( TR ) 

1TR 

°TR 

PT 

(AC) 

“  PT 
AMR 

+  PT 

TR 

Additional 

Storage 

Registers 

Ref  1,  Eqn  5-12 
Ref  1,  Eqn  5-14 


Storage 

Register 


Stored  Quantity 
SD  -  Solidity  of  Main  Rotor 
SD(TR)  -  Solidity  of  Tail  Rotor 
AR  -  Advance  Ratio  of  Main  Rotor 
AR(TR)  Advance  Ratio  of  Tail  Rotor 
PI  -  Induced  Power 

PT(TL)  -  Induced  power  with  Tip  Loss 
PTfTR)  -  Tail  Rotor  Induced  Power 


FLITE 


Subroutines  to  Determine  Individual  Parameters: 

*****  To  AVIEW  the  answers  for  these  subroutines, 
set  flag  07  (SF  07)  **** 

Input  data  --  XEQ  DATA 

Density  —  XEQ  DATA  :  XEQ  PA 

Disk  Area  (MR)  —  XEQ  DATA  :  XEQ  AD 

Disk  Area  (TR)  —  XEQ  DATA  :  XEQ  ADTR 

Tip  Velocity  —  XEQ  DATA  :  XEQ  VT 

Tip  Velocity  (TR)  —  XEQ  DATA  :  XEQ  VTTR 

Advance  Ratio  (MR)  —  XEQ  DATA  :  Store  VF  (ft/sec) 

in  Reg  18  :  XEQ  AR 

Advance  Ratio  (TR)  --  XEQ  DATA  :  Store  VF  (ft/sec) 

in  Reg  18  :  XEQ  ARTR 

Solidity  (MR)  --  XEQ  DATA  :  XEQ  SD 

Solidity  (TR)  —  XEQ  DATA  :  XEQ  SDTR 

Coefficient  of  Thrust  (MR  —  XEQ  DATA  :  XEQ  CT 

Tip  Loss  (MR)  —  XEQ  DATA  :  XEQ  CT  :  XEX  TL 

Ground  Effect  —  XEQ  DATA  :  XEQ  GE 

****  The  following  parameters  can  only  be  determined 

by  executing  FLITE  and  then  recalling  the  storage 
register  for  that  parameter  **** 

Coefficient  of  Thrust  (TR)  —  XEQ  FLITE  :  RCL  30 

Tip  Loss  (TR)  —  XEQ  FLITE  :  RCL  34 

Induced  Velocity  (MR)  —  XEQ  FLITE  :  RCL  31  (value  will  be 

for  chosen  flight  condition) 

Induced  Velocity  (TR)  —  XEQ  FLITE  :  RCL  32  (value  will  be 

for  chosen  flight  condition) 


A- 


/-  .v  ■, 


U. 


3 


23 


FLITE 


INSTRUCTIONS 


1.  Initialize  program 

2.  You  may  determine 
power  requirements 
for  main  rotor  only 
or  main  and  tail 
rotor 

MR  ONLY  (  1  ) 

MR  +  TR  (  0  ) 


3.  Do  you  need  to  input 
any  data? 

Yes  (  1  )  No  (  0  ) 

If  No,  go  to  Step  21a 

4.  Is  main  rotor  blade 
rectangular? 


5  Yes  -  Input  value  of 

chord  ( f t) . 

Go  to  Step  8 

5a  No  -  Input  root  chord 

(  ft) 

6.  No  -  Input  tip  chord 

(  ft) 

7.  Input  fractional 
distance  where  taper 
begins 

8.  Continue  from  Step  5 

9.  Input  MR  Radius  (ft) 


10. 


Input  MR  Rotational 
velocity  (rad/sec) 


11.  Input  MR  coefficient 
of  drag 


Size  060 


INPUT 

FUNCTION 

DISPLAY 

XEQ  FLITE 

MR  ONLY? 

0 

R/S 

1 

MR  AND  TR 
( pause) 
NEED  DATA 

i 

1 

R/S 

REC? 

1 

R/S 

c0=? 

1.75 

R/S 

R=? 

- 

- 

(Cl=?) 

- 

- 

( a=? ) 

- 

- 

ce= 

R/S 

1 

R=? 

26.8 

R/S 

RV=? 

27.0 

R/S 

Cdo=? 

.  008 

R/S 

b=? 

INSTRUCTIONS 


INPUT 


FUNCTION 


DISPLAY 


12. 

Input  number  of  Main 
Rotor  blades 

4 

R/S 

R  (  TR  )  =  ? 

13. 

Input  TR  radius  (ft) 

5.5 

R/S 

C ( TR )=? 

14. 

Input  TR  chord  (ft) 

.81 

R/S 

RV (TR )=? 

15. 

Input  TR  rotational 
velocity  (rad/sec) 

124.6 

R/S 

Cdo ( TR ) =? 

16. 

Input  TR  Coefficient 
of  Drag 

.008 

R/S 

b(TR)=? 

17. 

Input  number  TR  blades 

4 

R/S 

L=? 

18. 

Input  tail  length  (ft) 

31.5 

R/S 

W=? 

18a. 

Continue  from  Step  12 

W =? 

19. 

Input  gross  weight  (lbs) 

20000 

R/S 

RTR  HT=? 

j  20. 

i 

Input  height  of  MR 
above  skid/wheel  (ft) 

11.2 

R/S 

SKID  HT=? 

!  21. 

i 

1 

Input  height  of  skids 
above  ground  (ft) 

2500 

R/S 

HOVER  ONLY? 

S  21a . 

Continue  from  Step  3 

HOVER  ONLY? 

22. 

Is  problem  for  hover 
flight  only? 

Yes  (  1  )  No  (  0  ) 

If  Yes  go  to  Step  28a 

0 

R/S 

FWD  ONLY? 

23. 

Is  problem  for  forward 
flight  only? 

Yes  (  1  )  No  (  0  ) 

If  Yes  go  to  Step  25 

0 

R/S 

VERT  ONLY? 

VF=?  (Yes) 

24. 

Is  problem  for  vertical 
flight  only? 

Yes  (  1  )  No  (  0  ) 

If  Yes  go  to  Step  27 

0 

R/S 

FWD  +  VERT 
( pause ) 
VF=? 

VV=?  (Yes) 

INSTRUCTION 


INPUT 


FUNCTION 


DISPLAY 


Input  Forward  velocity 
(kts)  (Must  input  each 
time  through  program 

50 

R/S 

*3 

n 

•o 

26. 

Input  forward  Equiv? 

Flat  Plate  Area  (ft  j 
(Must  input  each  time) 

If  FWD  ONLY  go  to  Step 
28a. 

25.7 

R/S 

VV=? 

27. 

Input  vertical  velocity 
(fpm).  (Must  input  each 
time ) 

200 

R/S 

FV=? 

28. 

Input  vert.  Equiv.  Flat 
Area  ( f ) .  (Must 
input  each  time) 

30.8 

R/S 

PA? 

28a. 

Continue 

PA? 

29. 

Are  you  using  Pressure 
Altitude? 

Yes  (  1  )  No  (  0  ) 

If  Yes  go  to  Step  30a. 

0 

R/S 

DA=? 

29. 

If  you  are  running 

FLITE+ ,  you  will  get 
output  for  DEN,  AD,  VT 
AR,  CT,  B,  SD  and  VI 

DEN  = 

* 

★ 

VI  = 

30. 

Input  density  alt.  (ft) 
Go  to  Step  31 

2500 

R/S 

PI=773 . 6 

30a. 

Input  Temp  (°F) 

R/S 

PI= 

31. 

Output  induced  power 
w/o  TL  or  GE  (SHP) 

R/S 

PI (TL )=798 

31a. 

If  you  are  running 
FLITE+,  you  will  get 
output  for  GE. 

GE= 

32. 

Ouput  induced  power 
w/TL  (SHP) 

R/S 

PI (TL+GE)= 
798.3 

33. 

Output  induced  power 
w/ ( TL+GE )  SHP) 

R/S 

PO=302 . 0 

FLITE 


INSTRUCTION 

INPUT 

FUNCTION 

DISPLAY 

34. 

Output  profile  power 
( SHP ) 

R/S 

PP=3  3 . 1 

35. 

Output  parasite  power 
(SHP) 

R/S 

PC=  121.2 

36. 

Output  climb  power 
(SHP) 

R/S 

PT ( MR ) = 
1252.6 

37. 

Output  total  power  (SHP) 

PI ( TR+TL ) = 
33.6 

37a. 

If  you  are  running 

FLITE+ ,  you  get  output 
for  ADTR ,  VTTR ,  ARTR 

3DTR ,  CTTR ,  BTR,  VI TR 
and  PI (TR) 

i 

ADTR= 

* 

★ 

* 

PI ( TR ) = 

37b. 

If  MR  only,  go  to 

Step  42. 

R/S 

CHANGE? 

38. 

Output  induced  power 
(TR)  w/TL  (SHP) 

R/S 

PO (TR )=24 . 5 

39. 

Output  profile  power 
(TR)  (SHP) 

R/S 

PT (TR ) =58 . 2 

40. 

Output  total  power 
(TR)  (SHP) 

R/S 

PT  ( AC )  — 
1310.7 

41. 

Output  total  power 
for  AC  MR  +  TR  (SHP) 

R/S 

CHANGE? 

42. 

Do  you  wish  to  change 
any  Input  Data? 

Yes  (  1  )  No  (1  ) 

Yes  will  restart 

No  will  stop  program 

See  NOTE 

0 

R/S 

0.0000 

Note:  To  make  changes  there  is  no  need  to  input  all 
the  data  again.  Just  change  those  values  which  require 
changing.  When  other  values  are  requested,  just  press 
R/S. 


***  THIS  DOES  NOT  APPLY  TO  VF .  W,  FF  or  FV  *** 


FLITE 


6I*IEL  ‘FLITE* 

51 ♦LBL  08 

e:  cr  «* 

52  -VFOTS) 

P3  CTO  to 

53  PROMPT  " 

‘FLITS** 

54  1.68889 

85  S'  er 

55  » 

06HBL  19 

5t>  STO  18 

07  CP  01 

57  *FF:’* 

03  CP  02 

58  PROMPT 

0*  CF  83 

5P  STO  12 

10  CP  04 

60  FS’  84 

11  CF  05 

61  CTO  87 

12  CF  86 

62  CTO  09 

13  0 

63»t8l  09 

1<  STO  12 

64  *W<FPH>: 

15  STO  13 

65  PROMPT 

Ip  SIC  16 

66  68 

17  STO  19 

67  / 

16  FIX  3 

68  STO  19 

1°  ONLY  ?* 

69  *FV=’* 

20  PR0M®T 

78  PPOMPT 

21  X>0’ 

71  STO  13 

::  cn  01 

72»L6L  07 

2:  ■•«F*TR»- 

73  xes  -pa- 

24  CVIEU 

74  XES  -PD* 

25  PS: 

75.  XEQ  -VT* 

2i  r,rr,  02 

76  XES  *PP* 

2?«IS-  01 

77  XES  *CT* 

2c  3r  01 

78  XES  *TL* 

2'i»ip,_  0? 

7<.  XES  *3D* 

30  XES  ‘[iSTQ* 

8*  XEP  *VIH- 

2:  "HOVER  OHLY  ’• 

El  Fp  05 

22  PROMPT 

82  CTO  13 

3S  X/8’ 

83  XES  *VIT* 

34  CTO  07 

84  FS’  06 

35  $"  «4 

£5  GTO  14 

36  ‘Filti  OHLY  ?• 

86  CTO  15 

3?  PPQMpT 

87»LEL  13 

38  X>8’ 

88  XES  *VIV 

39  CTO  08 

89  CTO  15 

46  $F  05 

9***LBL  14 

41  ‘VEFT  OHLY  ’* 

91  XES  *VITV 

42  PROMPT 

?2*L8L  15 

43  X>9’ 

93  *VI=* 

44  CTO  09 

94  FS’  07 

45  ‘•FHNVERT** 

95  XES  *S* 

46  OVIEU 

96  FIX  1 

47  PSE 

97  XES  •PI- 

40  SF  06 

98  XES  *PO* 

49  CF  84 

94  xes  *pp* 

50  CF  05 

100  XES  -PC* 

101  XES  *PT* 

151  FS’  01 

102  FIX  3 

152  CTO  86 

ie?  TV  8! 

153  RCL  05 

1*4  CTO  20 

154  -PLTR\=’- 

185  XEP  *TP* 

155  PPOMPT 

10p*LEl  20 

156  STO  05 

107  *CHPHCt  ’* 

157  RCL  06 

10S  PROMPT 

158  *c<TR >=’* 

109  X>8’ 

159  PROMPT 

119  CTO  11 

160  STO  06 

111  CTO  12 

161  RCL  07 

112*LBL  11 

162  *RV(TR>s’* 

113  FS’  07 

163  PROMPT 

114  XES  ‘FLITE+* 

le4  STO  87 

115  XES  ‘ELITE* 

165  RCL  09 

11p«LEl  12 

166  *CdOCTP >=**■ 

117  STOP 

167  PROMPT 

1 18»LBL  *DPTO- 

168  STO  08 

11°  -HEEP  POTO  ■>• 

It'*  RCL  09 

120  PROMPT 

178  *b<TR>=?* 

121  X=0’ 

171  PROMPT 

122  CTO  03 

172  STO  09 

123  -PEC  ’* 

l~3  RCL  10 

124  PROMPT 

174  -l=> 

125  X>0’ 

175.  PROMPT 

126  CTO  04 

176  STO  18 

127  XES  ‘ECHORD* 

T7#LE:  66 

128  CTO  05 

178  RCL  11 

t?*«LEL  04 

179 

1 3*4  ECL  01 

1P«  PROMPT 

121  •£«•»* 

is:  STO  11 

132  PROMPT 

182  RCL  14 

I33»LEw  85 

163  *RTP  HT=’* 

134  CTO  81 

1 ft4  PROMPT 

135  RCL  00 

185  STO  14 

136  •»*’• 

1&6  RCL  25 

137  PROMPT 

187  *S»CIIi  HT=“>- 

133  STO  00 

183  PROMPT 

139  RCL  82 

189  STO  25 

140  -PV:’* 

19**»LBL  03 

141  PPOHPT 

14|  RTH 

142  STO  82 

1924LBL  -ECHORD' 

143  RCL  83 

193  RCL  15 

144  •  CdO=‘>" 

t<*4  -cOr?- 

145  PROMPT 

195  PROMPT 

146  STO  83 

196  STO  15 

147  RCL  04 

197  RCL  16 

148  *b=’* 

198  *cL=’* 

149  PROMPT 

199  PROMPT 

150  STO  04 

200  STO  16 
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261  RCL  17 

251  STO  21 

2»:  “«=“»• 

252  / 

263  PROMPT 

253  288.16 

264  STO  17 

254  • 

2e?  4 

255  .23496 

26c.  YtX 

25o  YtX 

297  CHS 

257  CHS 

268  1 

258  1 

28^  ♦ 

259  ♦ 

210  RCL  15 

260  6.875  E-86 

211  RCL  16 

261  / 

212  - 

262  STO  20 

213  • 

263  STO  “ DEN* 

214  RCL  17 

2t>44L6L  *DR* 

215  CHS 

265  *DR=,‘ 

216  1 

2»i  PPCHPT 

217  ♦ 

267  STO  20 

218  / 

268*LEL  *DEH* 

211  4 

269  RCL  20 

220  ' 

276  6.875  E-06 

221  RCL  16 

271  « 

222  ♦ 

272  CHS 

221  CTO  01 

273  1 

22*  *c?s* 

274  ♦ 

22!  XEO  *$* 

275  ENTEPt 

226  PTN 

27o  4.2561 

227«L6.  *PR* 

277  YtX 

22?  -pa  v 

276  .0823769 

22<;  PpguPj 

279  » 

230  x**’ 

280  STO  22 

2'1  CTO  ‘OR* 

281  FIX  6 

ITO  *PQ:">* 

262  •&*►»-* 

2?7  prompt 

263  F?'  07 

274  STO  20 

2P4  XEO  *S’ 

225  6.875  E-08 

2S5  FIX  3 

236  « 

266  PIN 

2r  CHS 

287»LBL  *OD* 

228  1 

28$  RCL  80 

239  ♦ 

281  Xt2 

246  5.2561 

298  PI 

241  YtX 

291  » 

242  •TE«PTF>:‘>* 

2i’  STO  23 

243  PROMPT 

297 

244  STO  21 

2®4  F$">  07 

245  32 

2®5  XEO  *$* 

246  - 

296  PTH 

247  .5555 

2i7*L8t  *VT* 

240  • 

298  RCL  02 

249  273.16 

299  RCL  00 

250  ♦ 

360  • 

361  STO  27 

35!  XEO  •$• 

362  *VT=* 

352  PTH 

363  FS’  67 

3534L6L  *SD* 

304  XEO  *S* 

354  RCL  04 

3es  PTH 

255  RCl  01 

3to»LBl  *RR* 

356  • 

307  RCL  18 

357  RCL  06 

368  RCL  27 

358  / 

389  / 

259  PI 

310  STO  48 

366  / 

311  *fiP=* 

361  STO  46 

312  FS1  67 

362  *SD=* 

313  XEO  *$* 

363  FS">  67 

31«  RTH 

364  XEO  -S’ 

3!5»LBL  *CT* 

365  PIN 

316  RCL  22 

36c>»L6L  *CE* 

317  PI  * 

36’  RCL  25 

318  * 

3&3  PCL  14 

319  RCL  68 

36i  ♦ 

320  Xt2 

370  RCL  88 

221  » 

371  2 

322  RCL  00 

272  • 

223  PCL  02 

373  / 

324  • 

374  STO  26 

325  Xt2 

375  1.55 

326  • 

3  76  - 

327  I/X 

377  X>0"> 

323  RCL  11 

37S  CTO  13 

32Q  » 

37i  rcl  26 

330  STO  29 

380  1.3422 

fix  6 

29 1  » 

332  *CT*’ 

322  PCL  26 

333  Fr  67 

3S3  XT2 

374  XEO  *$* 

384  -1.4569 

335  FIX  3 

3S5  • 

33-  BTK 

266  ♦ 

337HBL  *TL* 

3S7  RCL  26 

339  FIX  3 

389  3 

339  RCL  29 

3?i  YtX 

340  2 

390  .7080 

341  • 

391  • 

342  SORT 

3<*2  ♦ 

343  PCL  04 

3C3  PCL  26 

344  / 

3<«4  4 

345  CHS 

295  YtX 

346  1 

396  -.1276 

347  ♦ 

397  * 

348  STO  33 

398  4 

341  -0r- 

399  .514 

358  FS->  07 

400  4 
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4ei  CTO  1* 
40?  *L£L  18 
463  1 

4*m«lEL  19 
405  STO  45 
46?  *CE=* 

403  FS*>  07 
40?  XEO  *S* 
40*  RTH 
4|m*l8L  *VIH* 

411  RCl  n 

412  2 

413  / 

414  RCl  22 

415  / 

4b  RCL  23 
417  / 

4 1C  SORT 
4!«  ETC  31 
420  PTH 
421*iei  -VIT- 

422  RCL  18 

423  XT2 

424  2 

425  / 

42o  CTO  53 
427  XT2 
423  RCL  31 
42*  * 

430  YTX 
471  * 

432  SORT 

433  RCL  53 
474  - 

473  5QPT 

436  CTO  31 

437  PTN 
420«LBL  *V!V* 
479  RCL  31 

446  XT2 
441  4 
44?  * 

447  PCI  19 

444  XT? 

445  ♦ 

446  SORT 

447  RCL  19 

448  - 

449  2 

450  / 


451  STO  31 

452  PTN 

453H6L  *VITV- 

454  RCL  19 

455  2 

456  / 

457  CHS 

453  RCL  31 

459  ♦ 

460  STO  31 

461  PTH 
4624LBL  -PI* 

463  RCL  11 

464  RCL  31 

465  * 

4t>6  550 

467  t 

468  STO  59 
46*  *<Ms* 

470  X£Q  *$• 

471  RCL  33 

472  / 

473  STO  51 

474  -PKTL>=* 

475  XEO  *S* 

476  XEO  -CE* 

477  RCL  51 

478  * 

47*  STO  33 
4 00  *PK7L*CE'-* 

481  XES  *$* 

482  PTH 
48?»LBL  *PO* 

4*4  RCL  48 

485  XT2 

486  4.3 

487  • 

488  1 

489  ♦ 

4*0  RCL  27 

491  3 

492  YTX 

49?  • 

4*4  PCI  23 

495  • 

496  PCI  22 

497  • 

498  RCL  03 

4**  • 

580  RCl  46 


501  * 

502  *400 

503  / 

5*<  STO  36 
505  *PO=* 

566  XEO  -S* 
507  RTH 
506*181  *PP* 
50*  RCL  18 

510  3 

511  YfX 

512  RCl  12 

513  * 

514  RCL  19 

515  3 

516  vtx 

517  RCL  13 

518  • 

519  ♦ 

520  PCI  22 

521  • 

522  1108 

523  / 

324  STO  37 

325  X=e7 

526  CTO  16 

527  *PR=* 

52?  XEO  ’S' 
5?**lEL  16 
570  PTH 

-2 !  ♦*  El 

532  PCI  11 

533  RCL  19 
57*  * 

335  539 
5o6  / 

537  STO  38 
533  X=0’ 

539  CTO  17 
54»  *PC=* 

541  XEO  *$* 
54?*LBL  17 
5*3  RTH 
544»!_ei  *PT* 
545  PCI  35 

540  RCL  36 

547  ♦ 

548  RCL  37 

549  ♦ 

558  RCL  38 


551  ♦ 

552  STO  39 
557  *PT(HR>s* 

554  XEO  -S* 

555  PTH 
55p»LBL  *TP* 

557  XEO  *fiD7P 

558  XEO  *VTTP 
55*  XEO  *RPTR 
568  XEO  *$ETR 
56 t  RCL  39 

562  558 

563  » 

5M  PCL  02 

565  / 

566  RCL  10 

567  / 

563  STO  40 
56*  PCL  2* 

570  / 

571  RCL  22 

572  / 

573  STO  35 
57*  PCL  28 

575  XT2 

576  / 

577  STO  38 
57?  FIX  6 
37*  *CTTR=* 

580  F?7  07 

«;•  yr* 

.  A*.  *  * 

5S 2  FIX  3 
523  2 

5*4  • 

585  SOPT 
5*e  RCL  09 
537  / 

588  CHS 
5e9  I 
59*  ♦ 

5*1  STC  34 

592  *BTRS* 

593  FS7  07 
5*4  XEO  *$* 

595  RCL  55 
5*6  2 

5*7  / 

5*8  XT? 

5«*  PCL  53 
600  XT2 
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661  ♦ 

651  • 

6?;  SOPT 

652  STO  28 

663  RCL  53 

653  *VTTRS* 

6M  - 

654  FS7  07 

6e5  SORT 

655  XEO  *S* 

60o  STO  37 

65?  PTH 

60'  • V I TP- • 

65?*LB'.  *ORTR 

668  FS7  07 

653  RCL  18 

609  XEO  *S* 

659  RCL  28 

616  RCL  40 

660  / 

611  • 

661  STO  49 

612  550 

662  *flRTR=* 

613  / 

663 'FS7  07 

61<  STO  52 

664  XEO  *S* 

615  SIX  1 

665  RTH 

616  "PI<TP  >=* ' 

66?»LBL  *SDTP 

61?  FS7  0? 

66?  RCL  09 

61?  XEO  *$* 

668  RCL  06 

618  PCI  34 

669  * 

620  / 

678  PCI  05 

621  STO  41 

671  / 

622  ■PF<TP*TL>=* 

672  PI 

623  XEO  *$• 

673  f 

624  XEO  -POTR* 

674  STO  47 

625  -poap>=* 

675  *SDTP=* 

626  XEO  *$* 

676  FS7  07 

62?  ♦ 

677  XEO  *S* 

62*  STO  43 

678  PTN 

62*  -PTaP)=* 

b'^LBL  -POTP* 

636  XEO  ’S* 

68*  PC_  49 

63:  PCL  39 

651  XT2 

632  ♦ 

6S2  4.3 

633  STO  44 

653  • 

634  •PT<fiC>s* 

684  1 

635  XEO  ’S’ 

685  ♦ 

63t  FIX  3 

686  PCL  28 

637  PTH 

68?  3 

636*182  *ADTR* 

683  YTX 

629  RCL  05 

689  • 

•>40  Xt2 

690  PCL  24 

641  PI 

691  • 

642  * 

692  RCL  22 

643  STO  24 

693  • 

644  -flJTPr* 

6*4  RCL  03 

645  FS7  07 

695  • 

64b  XEO  *$* 

696  RCL  47 

64?  PTH 

697  • 

640.LBL  *VTTR* 

6*8  4400 

649  J?CL  07 

699  / 

650  RCL  05 

700  STO  42 

70!  PTH 
?0?*LBL  *$* 
70'  ORCL  X 
70<  OVIEU 
7e5  STOP 
76?  RTH 
70?  EHD 
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FUEL 


Fuel  Flow  as  a  function  of  Power 

Introduction:  This  program  determines  the  relationship  between 
fuel  flow  rate  and  power  required  -  Phantom  Shaft  Horsepower 
( PSHP )  and  the  fuel  flow  rate  (ft,)  at  specified  velocities. 
This  program  runs  in  conjunction  with  POWER  which  must  be 
loaded  and  the  geometric  and  flight  parameters  loaded  through 
step  19  in  he  step-by-step  instructions.  The  input  parameters 
are  the  number  of  engines  (NENG),  a  (the  fuel  flow  rate 
versus  SHP  ordinate  intercept)  and  |  (the  slope  of  the  fuel 
flow  rate  versus  SHP  curve).  The  standard  data  set  is  used  as 
well  as  those  listed  below. 

Additional  Programs  Required:  POWER 

Equations 

Wf  =  (PSHP  +  Pt)*B 
PSHP  =  NENG* a*  6  •  /0/B 


Additional  Storage  Registers 

Storage  Stored  Quantity 

Registers 

49  PSHP  -  Phantom  Shaft  Horsepower 

55  NENG  -  Number  of  engines 

56  a  ~  Fuel  Flow  Rate  vs  SHP  intercept 

57  B  ~  Slope  of  Fuel  Flow  Rate  vs  SHP  curve 


Ref  2,  Eqn  7D-11 
Ref  2,  Eqn  7D-9 
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INSTRUCTIONS 

INPUT 

FUNCTION 

DISPLAY 

1.  Initialize  the  program 

2.  Reminder  flashes 

XEQ  FUEL 

*LOAD  POWER* 

NENG=? 

3.  Enter  the  number 
of  engines 

1  . 

R/S 

ALPHA  HAT=? 

4.  Enter  the  sea  level 
intercept  of  the 
fuel  flow  rate  vs 

SHP 

88.5 

R/S 

BETA  HAT=? 

5.  Enter  the  slope  of 
the  fuel  flow  rate 
versus  SHP  curve 

0.5 

R/S 

PSHP=177.0 

6.  Display  Phantom 
horsepower 

R/S 

VF=? 

7.  Enter  the  forward 
velocity  (kts) 

100 

R/S 

VV=? 

8.  Enter  the  vertical 
velocity  (fpm) 

0 

R/S 

W  DOT=65  2 . 6 

9.  Display  Fuel  Flow 

Rate  (lb/hr) 

R/S 

ANOTHER  VF? 

10.  Exit  the  program 

0 

R/S 

0.0 

REL 


01M.6L  "FUEL  “ 

0:  **LOAD  POUEP*" 

83  AVIEH 

84  PSE 

0!,  •NEHG='>* 

06  PROMPT 
8?  STO  55 
08  -ALPHA  HAT=?* 
09  PROMPT 

10  STO  56 

11  -BETA  HAT=’- 

12  PROMPT 

13  STO  57 

14  1/X 

15  * 

16  * 

17  RCL  47 
IS  * 

19  RCL  21 
28  518.688 
21  / 

22  SORT 

23  * 

24  STC  49 

25  -PSHP-'  ' 

26  APCL  X 

27  QVIEM 

28  STOP 
29*LBL  10 
38  SF  03 

31  CF  02 

32  XEQ  -Vf 

33  RCL  49 

34  RCL  44 

35  ♦ 

36  RCL  57 

37  * 

38  *M  D0T=- 
3«  PRCL  X 
46  AV1EU 

41  STOP 

42  -ANOTHER  VF> 

43  PPOMPT 

44  X=0‘> 

45  CTO  -COMP- 

46  GTO  18 
47M.BL  -COMP- 

48  CF  03 

49  CF  02 
56  END 
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High  Speed  Effects 

Introduction:  This  program  calculates  the  high  speed  effects 
including  both  retreating  blade  stall  and  advancing  blade 
Mach  effects.  Using  main  rotor  geometric  design  parameters 
and  the  forward  velocity  as  input  variables,  the  collective 
and  cyclic  angles  and  the  angle  of  attack  at  the  tip  of  the 
blade  at  the  90  degree  and  270  degree  azimuth  are 
determined.  The  change  of  power  due  to  stall  effects  (*P<S>) 
and  the  change  in  power  due  to  Mach  effects  (*P<M>)  are 
computed  and  added  to  the  total  power  required  to  furnish  a 
corrected  power  required  (P<C>).  The  collectve,  cyclic  and 
blade  angles  of  attack  are  not  displayed,  but  may  be 
obtained  by  recalling  the  applicable  data  register. 

Due  to  the  difficulties  with  the  Retreating  Blade  Stall 
equations  as  listed  in  Ref.  1,  this  program  assumes  that  the 
Coefficient  of  Profile  Drag  is  doubled  when  the  retreating 
blade  tip  angle  of  attack  exceed  the  maximum  angle  by  4°, 
and  also  assumes  that  the  change  in  power  due  to  stall  is 
linear. 

This  program  must  be  run  following  POWER  and  uses  the  same 
standard  data  registers  as  POWER.  Additional  data  registers 
are  as  shown  below. 

Maximum  angle  of  attack  (blade  stall  angle)  must  be  entered, 
and  a  value  other  than  zero  must  be  entered  for  the 
blade  twist.  The  normal  range  of  values  for  twist  is  from  -7 
to  -18  degrees. 

Additional  Programs  Required:  POWER 

Equations : 


2CT/acr  =  XT^  +  eQT2  +  0TT3  +  02T4  Ref  1'  E(3n  8-19 

0  =  XA11  +  6oA12  +  9TA13  +92A14  Ref  Eqn  8-20 

X  -  (VOj  -  vw)/VT 

a»  =  tan  ^ ( D  /W)  Ref  1,  Eqn  8-4 

3  p 

V  =  Vf/VT  Ref  1,  Eqn  8-2 
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Equations  (Continued) 
T 


2  2 
=  . 5 ( Bz  +  .5U  ) 


T2  =  ( . 33B3  +  . 5u2B) 


2  2  2 
T3  =  .25BZ(B  +  y  ) 


T4  =  . 5  y ( B2  +  . 2  5  y 2 ) 


A1X  =  4(yB2/2  -  y3/8)/B2(B2  -  .5y2) 


A12  =  8yB/3(e2  -  - 5 y2 ) 


a13  =  2yB2/(B2  -  . 5 y2 ) 


A14  =  (fi2  +  1  -  5  TJ2  >  / (  b2  -  -5y2) 


0n  =  Collective  Pitch  Angle 


02  =  Longitudinal  Cyclic  Pitch  Angle 


0T  =  Blade  Twist  Angle 


=  2  C,  (  a”  -am=v)/4 
dos  do  90  max 


*p<s>  .  P0lcd  /c  ) 

S 


Mcrit  0-71  "  I2- 3  I “90  (rad) 


M90  *  "tip11  +  111 


M,  =  MQf.  -  M  -  0.06 

d  90  crit 


C  =  ( 0 . 01 2 A  M,  +  0 . 1AM j J ) 
Pm  d  d 

m  , 

*  P<M>  =  C  ApV_J 


Ref 

1, 

Eqn 

8- 

-17 

Ref 

1, 

Eqn 

8- 

-17 

Ref 

1, 

Eqn 

8- 

-17 

Ref 

1, 

Eqn 

8- 

-17 

Ref 

1, 

Eqn 

8- 

-18 

Ref 

1, 

Eqn 

8- 

-18 

Ref 

1, 

Eqn 

8- 

-18 

Ref 

1, 

Eqn 

8- 

-18 

Ref 

1, 

Eqn 

8-30 

Ref 

1, 

Eqn 

8-29 

Ref 

1, 

Eqn 

8-21 

Ref 

1, 

Eqn 

8-31 

Ref 

1, 

Eqn 

3-25 

Additional  Storage  Registers 

Storage  Stored  Quantity 

Register 


15  a  Solidity 

16  *  P<M>~ — Gha-ng-s — in  -Powo  r  duo  to  Mach  of  fee  to 

17  AM^  -  Excess  Mach  over  corrected  critical  value 

46  0^  -  Twist  angle 

47  X  =  Inflow  ratio 

48  y  =  Advance  ratio  (V^/V^) 

The  Following  Registers  are  used  for  storage  after  line  160 

49  0  (Collective  Pitch) 

50  a270  (Retreat:*-ni3  Blade  Tip  Angle  of  Attack) 

52  *P<S>  -  Change  in  Power  due  to  Blade  Stall  Effects 

53  *P<M>  -  Change  in  Power  due  to  Compressibility 

54  oigg  (Advancing  Blade  Tip  Angle  of  Attack) 

02  (Longitudinal  Cyclic  Pitch) 


55 


HSE 


SIZE  060 

INSTRUCTION 

INPUT 

FUNCTION 

DISPLAY 

Initialize  Program 

XEQ  HSE 

TWIST<DEG>=? 

Input  Twist  Angle 
( Degrees ) 

-9 

R/S 

a<MAX>=?x 

Input  max  angle  of 
attack  (Degrees) 

12.5 

R/S 

BLADE  STALL 

Output  change  in 
power  due  to 
stall  ( SHP ) 

R/S 

*P<S>=668. 2 

Output  change  in 
power  due  to 

Mach  (SHP) 

R/S 

*P<M>=39  3 . 8 

Output  total  power 
including  high  speed 
effects  (SHP) 

R/S 

PT<C>=3 , 3157 . 2 

Note:  This  program  may  be  accessed  directly  from  POWER  by 
answering  the  question  "HI  SPD?”  with  a  Yes  (Input  <1>),  or  it 
may  be  run  directly  as  shown  above,  provided  that  either  POWER 
has  previously  be  run  or  the  data  registers  1  through  19  plus  44 
have  been  loaded  with  the  correct  values. 


HSE 


@ 1 ♦LBL  -HSE- 
«2  RCL  4b 

51  * 

101  RCL  33 

03  57.3 

52  2 

102  * 

04  * 

53  / 

103  STO  57 

05  *THIST<DEG>=?‘ 

54  + 

104  RCL  54 

06  PROMPT 

55  4 

105  RCL  55 

07  57.3 

56  * 

106  + 

08  / 

57  RCL  49 

107  RCL  54 

89  8 TO  4b 

58  / 

108  * 

10  RCL  16 

59  RCL  54 

109  4 

11  *3<H0X>=?" 

69  / 

110  / 

12  PROMPT 

61  STO  58 

111  STO  58 

13  STO  16 

62  RCL  33 

112  RCL  55 

14  RCL  37 

63  RCL  48 

113  4 

15  RCL  11 

64  * 

114  / 

16  / 

65  2.6667 

115  RCL  54 

17  550 

66  * 

116  + 

18  * 

67  RCL  49 

117  RCL  48 

19  RCL  31 

68  / 

118  * 

20  2 

69  STO  51 

119  2 

21  * 

70  RCL  48 

120  / 

22  - 

71  RCL  54 

121  STO  59 

23  RCL  27 

72  * 

122  RCL  29 

24  / 

73  2 

123  .15 

25  CHS 

74  * 

124  * 

26  STO  47 

75  RCL  49 

125  RCL  15 

27  RCL  18 

76  / 

126  / 

28  RCL  27 

77  STO  52 

127  STO  55 

29  / 

78  RCL  55 

128  RCL  47 

38  STO  48 

79  1.5 

129  RCL  56 

31  Xt2 

88  * 

138  * 

32  STO  55 

81  RCL  54 

131  ST-  55 

33  RCL  33 

82  + 

132  RCL  4b 

34  Xt2 

83  RCL  49 

133  RCL  58 

35  STO  54 

84  / 

134  * 

36  RCL  55 

85  STO  53 

135  ST-  55 

37  2 

86  RCL  55 

136  RCL  55 

38  f 

87  2 

137  RCL  51 

39  CHS 

88  / 

138  * 

40  RCL  5-» 

89  RCL  54 

139  STO  17 

41  * 

98  + 

148  RCL  47 

42  STO  49 

91  2 

141  RCL  50 

43  RCL  48 

92  / 

142  * 

44  RCL  55 

93  STO  56 

143  RCL  4b 

45  * 

94  RCL  55 

144  RCL  52 

46  8 

95  2 

145  * 

47  •- 

9b  f 

14b  RCL  57 

48  CHS 

97  RCL  54 

147  * 

49  RCL  54 

93  3 

148  RCL  17 

50  RCL  4g 

99  / 

149  ♦ 

100  + 

150  CHS 

39 


IVl' 


£ 


151  STO  1? 

152  RCL  53 

153  RCL  57 

154  * 

155  RCL  59 

156  RCL  5! 

157  * 

158  - 
15?  1/X 

168  RCL  17 
161  * 

162  STO  55 

163  PCL  53 

164  * 

165  RCL  47 

166  PCL  58 

167  * 

168  + 

169  RCL  46 
178  RCL  52 

171  * 

172  + 

173  RCL  51 

174  / 

175  CHS 

176  STO  4? 

177  RCL  55 

178  - 

179  RCL  46 
188  + 

181  RCL  48 

182  1 

183  + 

184  1/X 

185  RCL  47 

186  * 

187  + 

188  57.3 
139  * 

198  STO  53 

191  RCL  16 

192  - 

193  8 

194  vr 

195  CTO  "N?,“ 

196  XGY 

197  -BLADE  « 

198  OVIER 

199  PSE 
288  4 


281  / 

282  PCL  43 

283  Xt2 

284  4,3 

285  * 

286  1 

237  t 

288  1/X 

289  PCL  36 
218  * 

211  * 

212  STO  53 

213  -P<S)=* 

214  ARCL  X 

215  AV1EH 

216  STOP 
217*LBL  ■HP- 

218  RCL  22 

219  .11743 
228  YtX 

221  2257.3 

222  * 

223  1/X 

224  RCL  13 

225  RCL  27 

226  + 

227  * 

228  ,77 

229  - 

238  RCL  54 

231  .8481 

232  * 

233  + 

234  STO  56 

235  8 

236  X>Y? 

237  CTO  "NH* 

238  XOY 

239  3 
248  YtX 

241  .1 

242  * 

243  RCL  56 

244  .812 

245  * 

24h  t 

247  RCL  15 

248  * 

249  RCL  22 
258  * 


251  PCL 


255  YTX 

256  * 

257  558 


259  STO  52 
268  CTO  *HH* 
261+LBL  *NH- 
262  8 
263  STO  52 
264*LBL  -HH- 

265  RCL  52 

266  •P<H>=- 

267  PPCL  X 

268  mV  I Em 

269  TOP 
278  RCl  52 
271  PCL  53 

LI  w 

273  RCL  44 

274  + 

275  -P<HSE>=- 

276  ftRCL  X 

277  PVIEK 

278  STOP 

279  CTO  -VF- 
288*LBL  -HS- 

281  ’HO  STALL- 

282  PVIEU 

283  STOP 

284  CTO  -HP- 

285  .END. 


-'.V 


v-'.-v  -•  r*v-^ wv\‘ 


POWER 


Helicopter  Power  Requirements 

Introduction:  The  user  inputs  the  basic  geometric  and  flight 
parameters  of  the  helicopter  and  the  program  determines 
the  steady  state  power  requirements  to  maintain  that 
condition.  High  speed  effects  are  not  included  but  may  be 
determined  by  running  the  high  speed  effects  program  (HSE) 
following  this  program.  POWER  requires  no  other  subroutines 
to  operate.  It  utilizes  the  Standard  Data  Set  for  storage 
registers  00  through  45,  and  additionally  those  listed 
below. 

Additional  Programs  Required:  None 

Equations : 


{(h/d)  -  1.55)  <  0?  (In  Ground  Effect?)  Ref  1,  Fig  2,  pg 


(pi/p.  )  =  0.5147  +  1.3432 (h/D)  -  1.4569(h/D)2  + 
OGE 


0.7080 (h/D) 3  -  0.1276 (h/D) 4 

Ref 

lr 

Eqn 

3-8 

palt 

=  pgsl(l  -  6.875xl0“6-H)5-2561 

Ref 

2, 

Eqn 

7D-5 

alt 

=  ssl(l  -6.8755xl0"6*H)4’2561 

Ref 

2, 

Eqn 

7D-6 

CT  ~ 

W/  pA  (  ttR  )  2 

Ref 

1, 

Eqn 

2-23 

B  =  1 

-^c“/b 

Ref 

1, 

Eqn 

3-1 

vi  = 

(W/2  PA)  •  5 

Ref 

1, 

Eqn 

2-15 

P.  = 

1 

(P./P,  )  ( Tv  .  /  (  5  50  »B  )  1 fl+.25(V  2/v.2 

OGE  i  r  1 

)} 

-  .5(vf2/v.2)  I*5 
r  1  J 

Ref 

1, 

Eqn 

4-41 

P  = 

0 

(Cd  pb  c  R  Vt3/4400)(1  +  4 . 3y 2 ) 

Ref 

1, 

Eqn 

4-53 

o 

pp  =  Vf3Ff P/1100  Ref  1,  Eqn  4-56 

Pc  =  TVV/550  +  <.5pF  V  3)/550  Ref  1,  Eqn  4-2B 

Eqn  4-2S 


1 TR 


=  556  P  /(ft  £  ) 

MR' '  MR  TR' 


Ref  1,  Eqn  5-2 


POWER 


SIZE  060 


INSTRUCTION 

INPUT 

FUNCTION 

DISPLAY 

1. 

Initialize  Program 

XEQ  POWER 

2. 

Reminder  flashes 

R/S 

NEED  DATA? 

3. 

Answer  1  for  yes, 

0  for  no 

1 

R/S 

W=? 

4. 

Input  weight  (lbs) 

20000 

R/S 

RV=? 

5. 

Input  main  rotor 
rotational  velocity 
( rad/sec) 

27 

R/S 

b=? 

6. 

Input  number  of  main 
rotor  blades 

4 

R/S 

c=? 

7. 

Input  main  rotor 
chord  (ft) 

1.75 

R/S 

Cdo=? 

8. 

Input  main  rotor 
drag  coefficient 

.008 

R/S 

R=? 

9. 

Input  main  rotor 
radius  (ft) 

26.8 

R/S 

FF=? 

10. 

Input  forward  flat 
plate  area  (ft^) 

25.7 

R/S 

FV=? 

11. 

Input  vertical-f lat 
plate  area  (ft^) 

30.8 

R/S 

RV (TR )=? 

12. 

Input  tail  rotor 
rotational  velocity 
( rad/sec ) 

124.6 

R/S 

b(TR )=? 

13. 

Input  number  of  tail 
rotor  blades 

4 

R/S 

C ( TR ) =? 

14. 

Input  tail  rotor 
chord  (ft) 

.81 

R/S 

Cdo ( TR ) =? 

15. 

Input  tail  rotor 
drag  coefficient 

.008 

R/S 

R ( TR ) =? 

16. 

Input  tail  rotor 
radius  (ft) 

5.5 

R/S 

L ( Tai 1 )=? 

POWER 


INSTRUCTION 

INPUT 

FUNCTION 

17. 

Input  length  of 
tail  (ft) 

30.5 

R/S 

18. 

Input  rotor  height 
above  skid  (ft) 

11.2 

R/S 

19. 

Input  skid  height 
above  ground  (ft) 

100 

R/S 

20. 

Do  you  know  pressure 
altitude? 

a.  Answer  1  for  yes 

1 

R/S 

Input  pressure 
altitude  (ft) 

0 

R/S 

Input  temperature 

59 

R/S 

or 

b.  Answer  0  for  no 

0 

R/S 

Input  density 
altitude  (ft) 

0 

R/S 

21. 

Input  forward  150 
velocity  (kt) 

R/S 

22. 

Input  vertical  0 
velocity  (ft/min) 

R/S 

23. 

Output  total 
aircraft  power  (SHP) 

R/S 

24. 

Output  main  rotor 
power  (SHP) 

25. 

Do  you  want  high 
effects? 

26. 

1  for  Yes 

0  for  No 

R/S 

DISPLAY 
RTR  HT=? 

SKID  HT=? 

PA? 

PA=? 

TEMP ( C ) =? 

VF=? 

DA=? 

VF=? 

VV=? 

PT (AC ) =1687 . 2 

PT( MR)=1647 . 8 

HI  SPD? 


POWER 


»1*LBL  -POWER- 

5!  PROMPT 

181  * 

15!  YtX 

92  FIX  1 

52  STO  86 

102  + 

152  FS?  84 

83  CF  02 

53  RCL  03  : 

103  RCL  26 

153  GTO  -RHO- 

04  CF  03 

54  *CdO<TR>=’’ 

104  4 

154  FS?  85 

05  "NEED  DATA?' 

55  PROMPT 

105  YtX 

155  STO  47 

06  PROMPT 

56  STO  08 

106  -.1276 

156»L8L  -TEMP- 

07  X=0? 

57  RCL  05 

107  * 

157  -TEMP<F>=’ 

08  GTO  -PGK- 

58  *R<TR>='?- 

108  + 

158  PROMPT 

09  RCL  11 

59  PROMPT 

189  .5147 

159  459.638 

10  *«=?■ 

60  STO  85 

110  + 

168  + 

11  PROMPT 

61  RCL  18 

111  STO  45 

161  STO  2! 

12  3T0  11 

62  -LXTOIL)^- 

112»L8L  -AREA- 

162  513.688 

13  RCL  92 

63  PROMPT 

■  113  RCL  09 

163  f 

14  “RV-?- 

64  STO  18 

114  Xt2 

164  1/X 

15  PROMPT 

65  RCL  14 

115  P! 

165  PCL  47 

16  3 TO  82 

66  -RTR  HT=> 

116  * 

166  * 

17  RCL  04 

67  PROMPT 

117  STO  23 

167  GTO  “RHO" 

18  *b=?- 

68  STO  14 

113  RCL  @5 

168*L8L  "DNA“ 

19  PROMPT 

69*LBL  -PGM- 

119  Xt2 

169  *DA=P“ 

26  STO  04 

78  RCL  25 

120  PI 

178  PROMPT 

21  RCL  01 

71  -SKID  HT-?" 

121  * 

171  STO  28 

22  -c=/>- 

72  PROMPT 

122  STO  24 

172*LBL  -DEN- 

23  PROMPT 

73  STO  25 

123*L8L  -VT- 

173  SF  84 

24  STO  01 

74  RCL  14 

124  PCL  00 

174  GTO  -ICAO* 

25  RCL  83 

75  ♦ 

125  RCL  82 

175»L8L  -RHO- 

26  *CdO=> 

76  RCL  80 

126  * 

176  STO  51 

27  PROMPT 

77  / 

127  STO  2" 

177  .0823769 

28  STO  83 

78  2 

123  RCL  85 

173  * 

29  RCL  08 

79  / 

129  RCL  87 

179  STO  22 

38  "R=?* 

80  STO  26 

138  * 

138  FS-  05 

31  PROMPT 

31  1.55 

131  STO  28 

132  GTO  -VP- 

32  STO  80 

32  - 

132*LSL  "DA- 

132  RCL  20 

33  RCL  12 

S3  X<0? 

133  -PA?- 

133  6.875  E-06 

34  ■FP='>' 

84  GTO  -GE- 

134  PROMPT 

184  * 

35  PROMPT 

35  1 

135  X=0’ 

135  CHS 

36  STO  12 

86  STO  45 

136  GTO  -PNfi- 

136  ! 

37  RCL  13 

37  GTO  -AREA’ 

137  SF  85 

187  + 

33  *FV=?* 

88»L8L  -GE- 

138  -PA=> 

138  518.683 

39  PROMPT 

39  RCL  26 

139  PROMPT 

189  * 

48  STO  13 

98  1.3432 

148  STO  28 

190  STO  21 

41  RCL  87 

91  * 

141»LBL  ‘ICAO- 

191  513.683 

42  -RV<TR  >=*>• 

92  RCL  26 

142  6.875  E-06 

192  / 

43  PROMPT 

93  Xf2 

143  * 

193  PCL  51 

44  STO  87 

94  -1  4569 

144  CHS 

194  * 

45  RCL  89 

95  * 

145  1 

195  STO  47 

46  -o<TR>=> 

96  * 

146  * 

196*L8L  "UP" 

47  PPOMPT 

97  RCL  26 

147  FS^  05 

197  CF  85 

43  STO  89 

98  3 

148  5.2561 

198*L8L  *VV 

49  RCL  86 

99  VtX 

149  FS’  84 

jcip  *VF=''- 

50  -cap;- 

100  .7083 

158  4.2C61 

200  PROMPT 

291  1.68394 
282  * 

283  STO  13 
204  -VV=?* 

285  PROMPT 

286  68 

287  / 

288  STO  19 

289  CP  85 
210  CF  84 
21l*LBL  -CT 

212  FS7  82 

213  QTO  87 

214  PCL  11 

215  RCL  23 


21c  / 

217  RCL  22 
213  ■' 

219  RCL  27 

220  XT2 

221  / 

222  STO  29 


251  * 

252  SORT 

253  RCL  89 

254  / 

255  CHS 

256  1 

257  + 

258  STO  34 
2594LBL  ‘VI ■ 
268  F3?  82 

261  RCL  43 

262  FC7  82 

263  PCL  11 

264  RCL  22 

265  / 

266  FS?  82 


267  RCL  24 

268  FC7  82 

269  RCL  23 
278  / 

271  2 


301  67.6 

382  X>Y? 

383  GTO  -PI 

384  RCL  40 

385  RCL  22 

386  / 

387  RCL  24 

388  / 

309  RCL  18 
318  / 

311  2 

312  / 

313  STO  32 
314+LBL  ‘PI 

315  FS'7  82 

316  RCL  32 


317  FC?  82 

318  RCL  31 

319  FS7  82 
328  RCL  48 

321  FC?  82 

322  RCL  11 


•24*LSL  87 

225  RCL  48 

226  RCL  24 

223  PCL  22 
229  / 

238  RCL  23 

231  m 

232  / 

233  STO  38 
234*LBL  *TL* 

235  FS'7  82 

236  GTO  89 

237  RCL  29 

238  2 

239  * 

248  SORT 

241  PCL  04 

242  / 

243  CHS 

244  1 

245  ♦ 

246  STO  33 

247  GTO  -VI' 
248»L8L  89 

249  RCL  38 


275  Xt2 

276  RCL  58 


230  STO  59 

281  Xt2 

282  1 
283  + 

234  SORT 

235  RCL  59 

236  - 

287  SORT 

288  RCL  58 
239  SORT 
298  * 

291  FS7  02 

292  STO  32 

293  FC7  02 

294  STO  31 

295  FS7  82 

296  GTO  li 

297  FC7  82 
293  GTO  -PI' 
299»LBL  11 
380  RCL  18 


325  RCL  34 

326  FC7  82 

327  RCL  33 

328  / 

329  FS7  82 

330  1 

331  FC?  02 

332  RCL  45 

333  * 

334  558 

335  / 

336  FS?  82 

337  STO  41 

338  FC?  02 

339  STO  35 
34h»LBL  "PO 

341  PCL  81 

342  RCL  84 

343  * 

344  RCL  88 

345  / 

346  PI 


349  FS7  82 

350  RCL  28 


I»J 


351  FC?  02 

481  RCL  18 

352  RCL  27 

402  3 

353  3 

403  YtX 

354  YtX 

404  RCL  12 

355  FS?  02 

405  * 

356  RCL  85 

406  RCL  22 

357  FC?  02 

407  * 

358  RCL  08 

483  1100 

359  m  4F 

489  / 

360 

410  STO  37 

361  FS?  02 

41ULBL  -PC- 

362  RCL  06 

412  RCL  19 

363  FC?  02 

413  3 

364  #$C  L  0 1 

414  YtX 

365  * 

415  RCL  13 

366  FS?  02 

416  * 

367  RCL  09 

417  RCL  22 

363  FC?  02 

418  * 

369  RCL  a  i 

419  2 

370  * 

428  / 

371  FS?  02 

42!  550 

372  RCL  08 

422  / 

373  FC?  02 

423  ST+  37 

374  RCL  93 

424  RCL  19 

375  * 

425  RCL  11 

376  *408 

426  * 

377  / 

427  2 

378  RCL  22 

423  / 

379  » 

429  553 

389  STO  52 

433  / 

331  RCL  IS 

431  ST-  35 

332  FS?  02 

432  RCL  19 

333  RCL  28 

433  RCL  11 

334  FC?  02 

434  * 

335  RCL  27 

435  553 

336  / 

436  / 

337  Xt2 

437  STO  38 

333  4.3 

438  RCL  35 

389  * 

439  + 

398  1 

440  RCL  36 

391  ♦ 

441  + 

392  RCL  52 

442  PCL  37 

393  * 

443  ♦ 

394  FC?  0? 

444  STO  39 

395  STO  36 

445»LBL  "THRUST 

396  FS?  02 

446  PCL  39 

397  STO  42 

447  553 

393  FS?  82 

448  * 

399  GTO  *PT‘ 

449  PCL  02 

400*tBL  "PP* 

453  / 

451  RCL  10 

452  X=3? 

453  GTO  *HN 

454  / 

455  STO  40 

456  SF  02 

457  GTO  *CT 
45S*LBL  “ PT 1 
459  PCL  41 
468  RCL  42 

461  + 

462  STO  43 

463  RCL  39 

464  * 

465  STO  44 

466  F S?  03 

467  GTO  13 

468  ■PT<(1C>= 

469  wRCL  X 

470  QVIEU 

471  STOP 
472*LBL  'IN* 

473  RCL  39 

474  -PT<KR>=' 

475  ORCL  X 

476  0V1EH 

477  STOP 

478  ’HI  SPD?" 

479  PROMPT 

480  X=8? 

481  GTO  «W 

482  GTO  -HSE- 
48?*LBL  13 
484  EH D 


Maximum  Endurance  Velocity 


Introduction:  This  program  finds  the  minimum  power  required  and 
thus  the  velocity  and  power  required  for  maximum  endurance. 
It  works  with  POWER  which  must  be  loaded  with  the  geometric 
and  flight  parameters  (up  through  and  including  step  19  in 
the  step-by-step  instructions).  Upper  and  lower  velocity 
bounds  and  the  velocity  stpe  increment  are  input  and  VE 
outputs  the  velocity  and  power  required  for  maximum 
endurance.  VE  utilizes  the  same  storage  registers  as  POWER 
and  additionally  those  listed  below.  No  new  equations  are 
employed . 

Additional  Programs  Required:  POWER 
Additional  Storage  Registers: 

Storage 

Register  Quantity  Stored 

48  Velocity  increment  (kts) 

50  V-STOP  -  Stopping  velocity  (kts) 
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scratch 


SIZE  060 

INSTRUCTIONS 

INPUT 

FUNCTION 

DISPLAY 

1.  Initialize  program 

2.  Reminder  flashes 

XEQ  VE 

*LOAD  POWER* 

V-START*? 

3.  Input  lower  bound 
velocity  (kts) 

50 

R/S 

INCR=? 

4.  Input  increment 
( kts ) 

10 

R/S 

V-STOP=? 

5.  Input  upper  bound 
Velocity  (kts) 

150 

R/S 

V ( END ) =90 

6.  Output  maximum 

endurance  velocity 
( kts ) 

R/S 

P ( END )=1058 

Note:  For  increased  accuracy,  after  first  run,  narrow  the  bounds, 
decrease  the  increment  and  re-run  the  program. 
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0l*LEL  *VE* 

21  « 

41  RCL  50 

02  **LOQD  POWER** 

22  STO  48 

42  PCL  18 

63  flVIEH 

23  *V-STOP=?* 

43  X<=Y? 

64  PSE 

24  PROMPT 

44  GTO  12 

05  **OR  PWRC** 

25  1.63389 

45*LBL  15 

66  PVIEU 

26  * 

46  CF  83 

67  PSE 

27  STO  50 

47  RCL  13 

08  SF  83 

28*L8L  12 

48  RCL  43 

09  *V-START=?* 

2?  RCL  44 

49  - 

16  PROMPT 

30  STO  51 

50  1.68339 

11  1.68839 

31  RCL  48 

51  / 

12  * 

32  ST*  18 

52  FIX  0 

13  STO  18 

33  CP  82 

53  “ V<  EHD  > 

14  6 

34  XEQ  *CT* 

54  ARCL  X  • 

15  8 TO  19 

35  RCL  51 

55  P'-'IEH 

It  CF  62 

36  RCL  44 

56  STOP 

17  *E0  *CT*  37  57  PCL  51 

18  -  ihi:p=^" 

39  CTO  14 

58  •P'ENB'- 

19  PROMPT 

3?  GTO  15 

59  SPCL  X 

20  1.63809 

*»*LBL  14 

60  OVIEW 

VMR 


Maximum  Range  Velocity 

Introduction:  This  program  determines  the  maximum  range 

velocity  of  a  given  configuration  helicopter.  The  user 
loads  POWER  with  the  basic  geometric  and  flight  para¬ 
meters  (up  through  and  including  step  19  in  the  POWER 
step-by-step  instructions).  Lower  and  upper  velocity 
bounds  are  input  by  the  user,  as  well  as  the  velocity 
increment  for  getting  from  the  lower  and  upper  bound. 
The  phantom  shaft  horsepower  of  the  aircraft  is  also 
entered.  This  can  be  determined  by  first  running  FUEL. 
VMR  then  iterates  through  POWER  in  order  to  determine 
the  minimum  ratio  of  the  sum  of  total  power  and  phantom 
power  <PT ( AC )  +  PSHP>  to  VF .  This  is  the  point  of  tangency 
of  a  line  drawn  from  the  point  of  zero  velocity  to  the 
power  versus  velocity  curve.  This  point  of  tangency  is  the 
point  of  maximum  range  for  the  aircraft.  VMR  utilizes  the 
same  storage  registers  as  POWER,  and  additionally  those 
listed  below. 

Additional  Programs  Required:  POWER 
Equations : 

Tan  <P  =  <PT  (AC )  +  PSHP>/VF  Definition  of  tan$ 

Additional  Storage  Registers: 

Storage 

Register  Stored  Quantity 

48  Velocity  increment  (kt) 

49  PSHP  -  Phantom  shaft  horsepower  (SHP) 

50  V-STOP  -  stopping  velocity  (kt) 
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scratch 


SIZE  060 

INSTRUCTION 

INPUT 

FUNCTION 

DISPLAY 

1. 

Initialize  program 

XEQ  VMR 

2. 

Reminder  flashes 

*LOAD  POWER* 

3. 

Reminder  flashes 

PSHP=? 

4. 

Input  phantom  shaft 
horsepower  (SHP) 

300 

| 

R/S 

V-START=? 

5. 

Input  lower  bound 
velocity  (kt) 

50 

R/S 

INCR=? 

6. 

Input  increment 
(  kt) 

10 

R/S 

V-STOP=? 

7. 

Input  upper  bound 
velocity  (kt) 

160 

R/S 

VMR= 

140 

8. 

Output  max  range 
velocity  (kt) 

R/S 

P ( VMR ) = 

1379 

9. 

Output  max  range 
power  (SUP) 

NOTE:  To  increase  accuracy,  repeat  procedure  with  10  kt 

between  the  lower  and  upper  bounds  and  an  increment  o 
1  kt. 
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01 ♦LBL  -VHR* 

38  XEQ  -CT- 

02  -*LOAD  POWER** 

39  RCL  44 

03  AVIEW 

40  RCL  49 

04  PSE 

41  + 

05  CF  02 

42  RCL  18 

06  SF  03 

43  / 

07  •PSHP=’- 

44  RCL  51 

08  PROMPT 

45  X>Y? 

09  STO  49 

46  GTO  02 

10  •V-START=’- 

*  47  GTO  03  ' 

11  PROMPT 

48»L8L  02 

12  1.68889 

49  RCL  Y 

13  * 

50  STO  51 

14  STO  18 

51  RCL  50 

15  0 

52  RCL  18 

16  STO  19 

53  X<=Y’ 

17  XEQ  *CT* 

54  GTO  01 

18  RCL  44 

55*LBL  03 

19  RCL  49 

56  RCL  18 

28  * 

57  RCL  48 

21  RCL  18 

58  - 

22  / 

59  STO  18 

23  STO  51 

60  1.63889 

24  • I NCR=?“ 

61  / 

25  PPOHPT 

62  FIX  8 

26  1.68889 

63  “VHR=” 

27  * 

64  ARCL  X 

28  STO  43 

65  AVIEW 

29  * V-ST OP=?“ 

66  STOP 

30  PROMPT 

67  CF  82 

31  1.68839 

68  XEQ  *CT* 

32  * 

69  RCL  44 

33  STO  58 

70  “P< VHP >=* 

34*LBL  01 

71  ARCL  X 

35  RCL  48 

72  AVIEW 

36  ST+  18 

73  STOP 

37  CF  02 

74  END 
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(WT  LT  -  Light) 

(WT  MED  -  Medium) 

(WT  HV  -  Heavy) 

Helicopter  Weight  Estimation 

Introduction:  These  programs  are  designed  to  provide  by  an 
iterative  process,  weight  estimations  to  be  used  in 
determining  final  helicopter  design  weight.  Curve  fit 
equations  determine  the  majority  of  component  weight 
values,  such  as  tail  structure  and  landing  gear  systems. 

Equations  are  listed  with  the  assignment  of  non-standard 

storage  registers  for  user  modification,  if  desired.  The 
equations  are  from  ref.  2,  Page  20  f.  The  user  must  enter 
into  storage  the  initial  values  defined  in  Storage 
Registers  01  -  blade  radius  (ft);  03  -  blade  chord  (ft);  05 
-  rotational  velocity  (rad/sec);  06  -  empty  weight  (lbs); 
07  -  number  of  people;  09  -  person  weight  (lbs);  09  - 

cargo  weight  (Ins);  33  -  fuel  weight  (lbs);  34  -  total 

power  ( S HP )  ;  36  -  number  of  engines;  and  37  -  engine 


weight  and/or  transmission  weight  (lbs),  if  specified. 

The  program  will  determine  revised  empty  weight,  gross 
weight  and  total  power  requirement  based  on  weight 
computations  plus  a  percentage  change  based  on  prior  value, 
(a  10%  or  less  change  is  usually  desired).  The  program 
allows  the  user  to  input  specific  transmission  and/or 
engine  weights,  or  it  will  generate  ts  own  curve  fit 


(a  10%  or  less  change  is  usually  desired).  The  program 
allows  the  user  to  input  specific  transmission  and/or 
engine  weights,  or  it  will  generate  ts  own  curve  fit 
values.  In  addition,  the  user  may  choose  to  retain  ininital 
inputted  values  or  to  revise  inputs  during  subsequent 
iterations  of  the  program. 


The  program  defines  useful  load  as  the  sum  of  both 
number  of  people  (times  the  person  weight  specified)  and 
the  cargo  weight. 

All  three  programs  utilize  very  similar  storage 
registers  and  prompt  similar  requests.  Program  WT  MED  is 
demonstrated  in  the  following  example. 


siv'Cv'Ov’X  V  V*  •">».  V  v>.*, 


paffwagwwvsi 


WT  MED  (Illustrated) 


INSTRUCTION 

1 . 

Initialize 

Program 

2. 

Input  Radius  (ft) 

3. 

Input  chord  (ft) 

4. 

Input  blade  number 

5. 

Input  RV  (rad/sec) 

6. 

Input  empty 

Weight  ( lbs) 

7. 

Input  People 

8. 

Input  Person 

Wt  (lbs) 

9. 

Input  cargo  wt 
( lbs) 

10 

•Input  fuel 
weight  ( lbs ) 

11 

.  Input  total 
power  ( SHP ) 

12 

.  Input  number  of 
engines 

INPUT 


FUNCTION 


Size  060 


DISPLAY 


R 


c—7 
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RV=? 


We=? 


PEOPLE52? 


PERSON 

WT=? 


CARGO25? 


UEL( lb ) =? 


T(SHP) 


NENG=? 


ACTWT  or 
R/S? 

ENG  WT(E) 


Given  the  option.  User  choses  to 
input  actual  weight  (ACTWT)  specified 


13a.  Input  specified 
Engine  weight 

750 

R/S 

ACWT  or 

R/ S— ? 

TRAN 

WT(E)=? 

14a.  Input  specified 
Transmi ss ion 
weight 

1600 

R/S 

REV  We= 
9276.7 

WT  MED 


INSTRUCTION 

15. 

Determine 

Revised  Total 
Weight  (lbs) 

16. 

Determine  Revised 
PT  ( SHP ) 

17. 

Determine  % 

Error 

13b 

.  Input  ENG  WT 

( Accepting 

Curve  fit  value) 

INPUT 


FUNCTION  I  DISPLAY 


WG=19526, 


Having  accepted  Curve  fit  value  for 

Engine  weight.  User  accepts  Curve  fit 
value  for  Transmission  weight 

14b.  Accept  Trans-  J 

mission  weight  | 
and  output  revised 

Empty  weight  1 

R/S 

REV  We= 
8509.4 

If  user  accepted  curvefit  values  for 
Steps  13b,  and  14b,  Resultant  values 
for  Steps  14,15,16,17  would  be: 

REV  We=  8509.4,  REV  WG=  18759.4, 

REV  PT=  1959.4,  and  ER(%)=  -6.14 

User  accepts  these  values  or  seeks 
additional  iteration  with  new  empty 
weight,  total  weight,  and  total 
power  (results  from  Steps  14,15,16). 


18.  Seeks  additional 
iteration 


R/S 

ENG  WT ( E ) 

=7 

19.  See  Step  12 
and  repeat 


above 


20.  Re-initialize 
program 


Weight  Estimating  Relationships 
Storage  Register  Utilization 
Light  Helicopter 


Storage 

Register 

Stored  Quantity 

01 

We  -  Empty  weight  (lbs) 

03 

People  -  Number  of  passengers  and  crew 

05 

Cargo  -'Weight  of  cargo  (lbs) 

06 

Fuel  (lbs)  -  Fuel  weight  (lbs) 

07 

PT  ( SHP )  -  Total  power  (SHP) 

08 

Neng  -  Number  of  engines 

09 

Gross  weight  (lbs) 

W  =  1 . 73*  W  *378 

10 

Total  tail  surface  area  ( sq  ft) 

Stt  =  0.264*e(  *013sHp) 

11 

Body  surface  area  ( sq  ft) 

Sb  =  194 . 274* In (W  )  -  1306.779 

12 

Main  rotor  system  weight  (lbs) 

W1  =  408 . 562* In (S)  -  1142.917 

13 

Tail  rotor  system  weight  (lbs) 

W2A  =  2.219*e(-  0005  Wg) 

Tail  rotor  structure  weight  (lbs) 

W2B  =  19 . 131* In (Stt)  -  32.414 

14 

Body  weight  (lbs) 

W3  =  0.00901*  Sb1,917 

15 

Landing  gear  weight  (lbs) 

W4  =  -0 . 0539*W  +  200.912 

16 

Nacelle  weight  (lbs) 

W5  =  34.0 

17 

Propulsion  Engine  weight  (lbs) 

W6 A  =  -0.0896*  HP  +  221.338 

LIGHT  HELICOPTER 


Storage 

Register 

Stored  Quantity 

18 

Drive  system  weight  .(lbs) 

W6B  =  17 . 190.  e  (*0008  g 

19 

Fuel  tanks  weight  (lbs) 

W6C  =  0.384*  (Fuel/6. 5) 1*11710 

20 

Flight  controls  weight  (lbs) 

W7  =  0.000000000128*W  3,1,69 

21 

Auxiliary  power  system  weight  (lbs) 

W8  =  0.0 

22 

Flight  instruments  weight  (lbs) 

W9  =  24 . 571*  e  HP) 

23 

Hydraulics  system  weight  (lbs) 

W10  =  0.0 

24 

Electrical  system  weight  (lbs) 

Wll  =  -51.0661* In  (SK)  +  367.947 

25 

Avionics  system  weight  (lbs) 

W12  =  105.0  +  Special  (if  any) 

26 

Furnishings  weight  (lbs) 

W13  =  19.8  e(->*  Pe°Ple)  ♦  a(-"”Sb> 

27 

Air  and  Ice  system  weight  (lbs) 

W14  =  -22. 371* In (Sb)  +  143.396 

28 

Load  and  Handling  equipment  weight  (lbs) 

W15  =  0.0 

33 

R  -  Main  rotor  radius  (ft) 

34 

c  -  Main  rotor  chord  (ft) 

35 

b  -  Number  of  blades 

36 


37 


Person  Wt  -  Weight  of  an  individual  (lbs) 

RV  -  Main  rotor  rotational  velocity  (rad/sec) 


LIGHT  HELICOPTER 


Storage 

Register 


Stored  Quantity 

Scratch 

Scratch 

Scratch 


Weight  Estimating  Relationships 
Storage  Register  Utilization 
Medium  Helicopter 


Register 

Stored  Quantity 

01 

We  -  Empty  weight  (lbs) 

03 

People  -  Number  of  passengers  and  crew 

05 

Cargo  -  Weight  of  cargo  (lbs) 

06 

Fuel  (lbs)  -  Fuel  weight  (lbs) 

07 

PT  ( SHP )  -  Total  power  (SHP) 

08 

Neng  -  Number  of  engines 

09 

Gross  weight  (lbs) 

W  =  16239. 43*ln(W  )  -  130252.76 

10 

Total  tail  surface  area  ( sq  ft) 

Stt  =  0 . 0376*  -  8.106 

11 

Body  surface  area  ( sq  ft) 

SK  =  6  36.O81*e(*ooo0n  Wg) 

12 

Main  rotor  system  weight  (lbs) 

W1  =  11 . 0702*  S  -  168.888 

13 

Tail  rotor  system  weight  (lbs) 

W2A  =  0.00438*W  +  12.470 

Tail  rotor  structure  weight  (lbs) 

W2B  =  2 . 411*  Stt  -  19.531 

14 

Body  weight  (lbs) 

W3  =  0.282*  SK  3,272 

15a 

or 

Landing  gear  weight  (lbs)-  Wg  less  than  6000  lbs 

W4  =  0 . 0 15  •  e  ^•°00062  Wg  +  8*02°) 

15b 

Landing  gear  weight  -  Wg  greater  than  6000  lbs 

W4  =  301. 577* In (Wg)  -  2319.890 

Nacelle  weight  (lbs) 

W5  =  Q,Q2-e(-  000062 Wg  +  8*02) 


16 


MEDIUM  HELICOPTER 


1  etorage 
^agister 

Stored  Quantity 

17 

Propulsion  Engine  weight  (lbs)-  One  engine 

W6A  =  130.0  +  0 . 4  51*  HP 

Two  or  more  engines 

W6A  =  295.0  +  0 . 188*  HP 

18 

Drive  system  weight  (lbs) 

W6B  =  741.460* In (HP)  -  4542.042 

19 

Fuel  tanks  weight  (lbs) 

W6C  =  363. 24* In (Fuel/ 6. 5)  -  1656.521 

20 

Flight  controls  weight  (lbs) 

W7  =  21O.858*e(*°00°®  g5 

21 

Auxiliary  power  system  weight  (lbs)-  One  engine 

W8  =  0.0 

Two  Or  more  engines 

W8  =  190.0 

22 

Flight  instruments  weight  (lbs) 

W9  =  56 . 0975* In (HP)  -  312.237 

23 

Hydraulics  system  weight  (lbs) 

W10  =  0.00362*Wn  +  11.553 

24 

Electrical  system  weight  (lbs) 

Wll  =  481. 735* In (Sb)  -  2794.530 

25 

Avionics  system  weight  (lbs) 

W12  =  250  +  Special  (if  any) 

26 

Furnishings  weight  (lbs) 

W13  =  0.175*  Sb  +  22.0*  People  -  10.0 

27 

Air  and  Ice  system  weight  (lbs) 

W14  =  122.458* ln(Sb)  -  730.252 

28 

Load  and  Handling  equipment  weight  (lbs) 

W15  =84.5 

33 

R  -  Main  rotor  radius  (ft) 

60 


MEDIUM  HELICOPTER 


Storage 

Register 

Stored  Quantity 

35 

b  -  Number  of  blades 

36 

Person  Wt  -  Weight  of  an  individual  (lbs) 

37 

RV  -  Main  rotor  rotational  velocity  (rad/sec) 

38 

Scratch 

39 

Scratch 

40 

Scratch 

Weight  Estimating  Relationships 
Storage  Register  Utilization 
Heavy  Helicopter 


Storage 

Register 


Stored  Quantity 


We  -  Empty  weight  (lbs) 


People  -  Number  of  passengers  and  crew 


Cargo  -  'Weight  of  cargo  (lbs) 


Fuel  (lbs)  -  Fuel  weight  (lbs) 


PT  ( SHP )  -  Total  power  (SHP) 


Neng  -  Number  of  engines 


Gross  weight  (lbs) 

W  =  4 . 975*W  *“7 

—9  ■  ■  —  — ■  — ^  ■  ■  ■  .  .  ■  ■ 

Total  tail  surface  area  ( sq  ft) 

Stt  =  60. 127*e(*  000,1,5  HP) 


Body  surface  area  ( sq  ft) 
Sb  =  426. 378*e  (*  00001,5  Wg 


Main  rotor  system  weight  (lbs) 
W1  =  707.174*e(,oos,S) 


Tail  rotor  system  weight  (lbs) 
W2A  =  324 . 550* In (W  )  -  3021.510 


Tail  rotor  structure  weight  (lbs) 
W2B  =  -18.0  +  2.830  Stt 


Body  weight  (lbs) 

W3  =  2 . 9818*  Sb  -  1321.921 


Landing  gear  weight  (lbs) 
W 4  =  258. 358*  e(<  00001,1 


Nacelle  weight  (lbs) 

W5  =  0.014*  (0.241  W J1*1* 


Propulsion  Engine  weight  (lbs)-  One  engine 
W6 A  =  348.0  +  0.910*  HP 


HEAVY  HELICOPTER 


Register 

Stored  Quantity 

18 

Drive  system  weight  (lbs) 

W6B  =  0 . 999*  HP  -9S 

19 

Fuel  tanks  weight  (lbs) 

W6C  =  454.619*  (Fpel/6 . 5 )  ”  *0566 

20 

Flight  controls  weight  (lbs) 

W7  =  0 . 0034  •  W  1-224 

21 

Auxiliary  power  system  weight  (lbs) 

W8  =  139.0 

22 

Flight  instruments  weight  (lbs) 

W9  =  68.266* In  (HP)  -  387.598 

23 

Hydraulics  system  weight  (lbs) 

W10  =  0 . 000000663*  W  1-863 

24 

Electrical  system  weight  (lbs) 

Wll  =  9 . 780* Sb-539 

25 

Avionics  system  weight  (lbs) 

W12  =  325  +  Special  (if  any) 

26 

Furnishings  weight  (lbs) 

W13  =  0.159*Sb  +  18.11*People 

27 

Air  and  Ice  system  weight  (lbs) 

W14  =  117.771* In  (sb)  -  710.594 

28 

Load  and  Handling  equipment  weight  (lbs) 

W15  =  -72.0  +  (0.111*Sb)  +  ( 3 . 4 9* People ) 

81*LBL  -«T  LT- 

82  RCL  33 
03  *P=?* 

04  PROMPT 
85  STO  33 
06  RCL  34 
07  -c=?* 

83  PROMPT 
09  STO  34 
10  * 

11  RCL  35 

12  ■b='>* 

13  PROMPT 

14  STO  35 

15  *S- 

16  RCL  34 

17  * 

18  RCL  33 

19  * 

20  STO  02 

21  RCL  37 

22  *RV=?* 

23  PROMPT 

24  STO  37 

25  RCL  01 

26  '«€=?• 

27  PROMPT 

28  STO  01 

29  RCL  03 

30  -PEOPLE=?" 

31  PROMPT 

32  STO  03 

33  RCL  36 

34  -PERSON  UT=t 

35  PROMPT 

36  STO  36 

37  RCL  93 

38  * 

39  STO  04 
48  RCL  05 

41  -CARGOS* 

42  PROMPT 

43  STO  05 

44  RCL  06 

45  -fuel  ae>=’* 

46  PROMPT 

47  STO  06 

48  RCL  07 

49  *PT  < SHP >='>• 

50  PROMPT 


51  STO  87 

52  RCL  88 

53  ‘NENG5?* 

54  PROMPT 

55  STO  08 
56*LBL  *«G- 

57  RCL  01 

58  .378 

59  YTX 

60  173.701 

61  * 

62  STO  09 
63*L8L  -STT- 

64  RCL  07 

65  .0135 

66  * 

67  ETX 

68  .264 

69  * 

70  STO  10 
71*LBL  -Sb* 

72  RCL  89 

73  LN 

74  194.274 

75  * 

76  1396.779 

77  - 

78  STO  11 
79»LBL  -HI* 

80  RCL  02 

81  LN 

82  408.562 

83  * 

84  1142.917 

85  - 

86  STO  12 

87  STO  29 
88*L6L  -H2A* 

89  RCL  09 

90  .0005 

91  * 

92  ETX 

93  2.219 

94  * 

95*L8L  -H2B- 

96  32.414 

97  - 

98  RCL  10 

99  LN 
100  19.131 


WT  LT 

101  * 

102  ♦ 

103  STO  13 

104  ST*  29 
105*LBL  -H3- 
166  RCL  11 
10?  1.91? 

108  YTX 

109  .00901 

110  * 

til  STO  14 
112  ST+  29 
1 13»LBL  -M4- 

114  RCL  09 

115  -.8539 

116  * 

117  200.912 

118  + 

119  STO  15 

120  ST+  29 
12ULBL  •US- 

122  34 

123  STO  16 

124  ST*  29 
125*LBL  -U60- 

126  RCL  07 

127  -.0396 

128  * 

129  221.383 
138  + 

131  STO  17 

132  CF  21 

133  -RCTHT  OR  R/S* 

134  AVIEU 

135  PSE 

136  SF  21 

137  -ENG  UTTJ>=> 

138  PROMPT 

139  STO  17 
148  ST*  29 
141*LBL  -W6B* 

142  RCL  09 

143  .0808 

144  * 

145  ETX  ' 

146  17.190 

147  * 

148  STO  18 

149  CF  21 

150  -ACTUT  OR  R/S- 


151  AVIEU 

152  PSE 

153  SF  21 

154  -TRAN  UT<E> 

155  PROMPT 

156  STO  18 

157  ST*  29 
158*LBL  -U6C- 

159  RCL  06 

160  6.5 

161  / 

162  1.871 

163  YTX 

164  .384 

165  * 

166  STO  19 

167  ST*  29 
168*LBL  -U7- 

169  RCL  89 

170  3.469 

171  YTX 

172  1.281  E-10 

173  * 

174  STO  20 

175  ST*  29 
176*LBL  -H8* 

177  8 

178  STO  21 

179  ST*  29 
180»L6L  *M9* 

181  RCL  07 

182  .0084 

183  * 

184  ETX 

185  24.571 

186  * 

187  STO  22 

188  ST+  29 
189*LBL  -U10- 

190  8 

191  STO  23 

192  ST*  29 
193*LBL  ‘Mir 

194  RCL  It 

195  LN 

196  -51.8661 

197  * 

198  367.947 

199  ♦ 

200  STO  24 


65 


WT  LT 


201  ST*  29 
202*LBL  -U12- 

203  RCL  07 

204  .003 

205  * 

206  EtX 

207  1120.354 

208  * 

209  IN 

210  -122.282 
211  * 

212  1082.004 

213  ♦ 

214  STO  25 

215  ST*  29 
21b*LBL  *H13* 

217  RCL  83 

218  .372 

219  * 

220  EtX 

221  19.8 

222  * 

223  RCL  11 

224  -.833 

225  * 

226  EtX 

227  + 

228  STO  26 

229  ST*  2° 
230*LBL  'wH* 

231  RCL  11 

232  LN 

233  -22.371 

234  * 

235  143.396 

236  * 

237  STO  27 

238  ST*  29 
239*L8L  *H15* 

240  8 

241  STO  28 

242  -NEW  Re- 

243  ST*  29 

244  -REV  He=- 

245  ARCL  29 

246  AVI EH 

247  RCL  29 

248  STO  01 

249  "FUEL  HT* 

250  RCL  06 


251  ST*  29 

252  -CARGO- 

253  RCL  85 

254  ST*  29 

255  -PEOPLE  HT* 

256  RCL  04 

257  -HEW  HT* 

258  ST*  29 

259  *HG=- 

260  ARCL  29 

261  AVIEU 

262  XE8  -PT- 

263  -REV  PT=* 

264  ARCL  07 

265  AVI EH 

266  ADV 

267  RCL  09 

268  RCL  29 

269  - 

278  RCL  29 

271  / 

272  100 

273  * 

274  -ER«>=* 

275  ARCL  X 

276  PROMPT 

277  RCL  29 

278  STO  09 

279  GTO  -HI- 
280*LBL  -PT* 

281  .125 

282  RCL  35 

283  * 

284  RCL  34 

285  * 

286  -CdO- 

287  .01 

288  * 

289  -DENSITY- 

290  .0823769 

291  ♦ 

292  RCL  37 

293  3 

294  YtX 

295  * 

296  RCL  33 

297  4 

298  YtX 

299  * 

300  STO  07 


301  2 

302  PI 

303  * 

304  -DENSITY- 

305  .0823769 

306  * 

307  RCL  33 
388  Xt2 

309  * 

310  SORT 

311  -B- 

312  .9? 

313  * 

314  1/X 

315  RCL  29 

316  1.5 

317  YtX 

318  * 

319  RCL  07 
329  ♦ 

321  550 

322  / 

323  STO  07 

324  RTN 

325  END 


bb 


WT  TIED 


0!*LBL  -MT  HEP- 

51  STO  07 

191  ST*  29 

151  RCL  07 

82  PCL  33 

52  RCL  08 

102*LBL  -M3* 

152  .24 

83  *P=?* 

53  -NEHG='J- 

183  RCL  11 

153  * 

84  PROMPT 

54  PROMPT 

104  1.272 

154  130 

05  STO  33 

55  STO  08 

105  m 

155  + 

8d  RCL  34 

56*LBL  -HG- 

106  .282 

156  STO  1? 

0?  *c=?* 

57  RCL  01 

107  * 

157  CF  21 

08  PROMPT 

58  IN 

108  STO  t4 

158  "ACTUT  OR  R/S' 

89  STO  34 

59  16239.43 

189  ST+  29 

159  PVIEU 

J0  * 

60  * 

118  RCL  09 

160  PSE 

11  RCL  35 

61  130252.76 

111  6800 

161  SF  21 

12  "b=?* 

62  - 

112  X>Y? 

162  *EHG  HT<2>=> 

13  PROMPT 

63  STO  89 

113  GTO  *«4l- 

163  PROMPT 

14  STO  35 

64H.8L  -STT- 

U4*LBL  -W42- 

164  STO  17 

15  -S- 

65  RCL  07 

115  RCL  09 

165  ST*  29 

16  RCL  34 

66  .8376 

116  LH 

166  GTO  -M6B- 

17  * 

67  * 

117  301.577 

167*LBL  -M6A2- 

18  RCL  33 

63  8. 186 

118  * 

168  RCL  87 

19  * 

69  - 

119  2319.89 

269  .19 

20  STO  02 

70  STO  18 

120  - 

170  * 

21  RCL  37 

71 *681  *Sb- 

121  STO  15 

171  350.4 

22  -PV=?* 

72  RCL  09 

122  ST*  29 

172  + 

23  PROMPT 

73  .800011 

123  GTO  -US* 

173  STO  17 

24  STO  37 

74  * 

124*L8L  -H41- 

174  CF  21 

25  RCL  81 

75  EtX 

125  RCL  09 

175  -flCTHT  OR  R/S* 

26  •«<;=?• 

76  636.031 

126  .000062 

176  AVI  EH 

27  PROMPT 

77  * 

127  * 

177  PSE 

28  STO  01 

78  STO  11 

128  3.82 

178  SF  21 

29  PCL  83 

79*LBL  *«r 

129  * 

179  -ENG  HT<E>=?- 

30  -PEOPLED* 

80  RCL  02 

138  EtX 

180  PROMPT 

31  PROMPT 

81  11.8702 

131  .825 

181  STO  17 

32  STO  03 

82  * 

132  * 

182  ST*  29 

33  RCL  36 

83  168.888 

133  STO  15 

183M.8L  -H6B- 

34  -PERSON  «T=->* 

84  - 

134  ST*  29 

184  RCL  07 

35  PROMPT 

85  STO  12 

135*LBL  -M5- 

185  LN 

36  STO  36 

86  STO  29 

136  RCL  09 

186  741.460 

37  RCL  03 

87»L8L  -H2A- 

13?  .mm 

18?  * 

38  * 

88  RCL  89 

138  * 

188  4542.842 

39  STO  84 

89  .08438 

139  8.02 

189  - 

40  RCL  85 

90  * 

(40  * 

198  STO  18 

41  -CftRGO=’- 

91  12.47 

14!  EtX 

191  CF  21 

42  PPOMPT 

92  ♦ 

142  .02 

192  -ACTUT  OR  R/S’ 

43  STO  @5 

93»LBL  -U2B* 

143  * 

193  A VIEW 

44  RCL  96 

94  RCL  10 

144  STO  16 

194  PSE 

45  -FOEL  <L8>=?* 

95  2.411 

145  ST*  29 

195  SF  21 

46  PROMPT 

96  * 

146  1 

196  TRAN  UT<E>=?’ 

47  STO  06 

97  ♦ 

147  PCL  08 

197  PROMPT 

48  RCL  07 

98  19.531 

148  X>Y? 

198  STO  18 

49  -PT  <SHP>=’* 

99  - 

149  GTO  -H6A2- 

199  ST*  29 

50  PROMPT 

109  STO  U 

150*L8L  -H601- 

200*L8L  -H6C- 

WT  MED 


201  RCL  06 

251  481.735 

381  ST+  29 

351  -DENSITY' 

202  6.5 

252  * 

302  ‘PEOPLE  NT* 

352  .0823769 

203  / 

253  2794.53 

303  RCL  04 

353  * 

284  IN 

254  - 

384  -HEN  HG* 

354  RCL  33 

205  363.24 

255  STO  24 

305  ST+  29 

355  Xt2 

206  * 

256  ST+  29 

306  *HG=* 

356  * 

207  1656.521 

257*LBL  “H12" 

387  ARCL  29 

357  SORT 

208  - 

258  RCL  07 

388  AVI  EH 

358  -B- 

208  STO  19 

259  .139 

389  XEQ  -PT- 

359  .97 

210  ST+  29 

268  * 

310  -REV  PT=‘ 

360  * 

21ULBL  *«?• 

261  77.823 

•  311  ARCL  87 

361  1/X 

212  RCL  09 

262  ♦ 

312  AVI EH 

362  RCL  29 

213  .000859 

263  STO  25 

313  ADV 

363  1.5 

214  * 

264  ST+  29 

314  RCL  09 

364  YtX 

215  EtX 

265*LBL  ’HI 3’ 

315  RCL  29 

365  * 

216  210.858 

266  RCL  03 

316  - 

366  RCL  @7 

217  * 

267  22 

317  RCL  29 

367  + 

218  STO  28 

268  * 

318  / 

368  550 

219  ST+  29 

269  10 

319  100 

369  t 

220fL8L  -H8- 

270  - 

320  * 

370  STO  07 

221  0. 

271  RCL  11 

321  *ERa>=* 

371  RTN 

222  STO  21 

272  .175 

322  ARCL  X 

372  END 

223  ST+  29 

273  ♦ 

323  PROMPT 

224  1 

274  ♦ 

324  RCL  29 

225  RCL  08 

275  STO  26 

325  STO  89 

226  X<=Y? 

276  ST+  29 

326  GTO  -HI- 

227  GTO  -H9- 

277M.BL  -H14- 

327»LBL  -PT- 

228  190 

278  RCL  11 

328  .125 

229  STO  21 

279  LN 

329  RCL  35 

230  ST+  29 

288  122.458 

338  * 

231 ♦LBL  *H9‘ 

281  * 

331  RCL  34 

232  RCL  07 

282  730.252 

332  * 

233  LN 

283  - 

333  -CdO* 

234  56.8975 

284  STO  27 

334  .01 

235  * 

285  ST+  29 

335  * 

236  312.237 

286*LBL  -H15- 

336  -DENSITY- 

237  - 

287  84.5 

337  .0023769 

238  STO  22 

288  STO  28 

338  * 

239  ST+  29 

289  -H EH  He* 

33 9  RCL  37 

240*LBL  “HI 0“ 

290  ST*  29 

348  3 

241  RCL  09 

291  ‘REV  Ne=‘ 

341  YtX 

242  .00362 

292  ARCL  29 

342  * 

243  » 

293  AVI EH 

343  RCL  33 

244  11.553 

294  RCL  29 

344  4 

245  ♦ 

295  STO  01 

345  YtX 

246  STO  23 

296  ‘FUEL  HT‘ 

346  * 

247  ST+  29 

297  RCL  06 

347  STO  87 

248*L8L  •«!!* 

298  ST+  29 

348  2 

249  RCL  11 

299  ‘CARGO' 

349  PI 

250  LN 

300  RCL  05 

358  * 

b« 


'«*  <* 


WT  HV 


01*LBL  -HT  HV 

82  RCL  33 

83  *R.=?* 

84  PROMPT 

85  STO  33 

86  PCL  34 

87  *c=?* 

08  PROMPT 
09  STO  34 
10  * 

11  RCL  35 

12  'b3?' 

13  PROMPT 

14  STO  35 

15  'S' 

16  RCL  34 

17  « 

18  RCL  33 

19  * 

20  STO  02 

21  RCL  37 

22  'PV3?' 

23  PROMPT 

24  STO  37 

25  RCL  81 

26  -M *=?• 

27  PROMPT 

28  STO  01 

29  RCL  83 

30  'PEOPLE3?' 

31  PROMPT 

32  STO  03 

33  PCL  36 

34  'PERSON  HT3’* 

35  PPOMPT 

36  STO  36 

37  RCL  83 

38  * 

39  STO  04 

40  PCL  05 

41  'CARGO3’' 

42  PROMPT 

43  STO  05 

44  RCL  86 

45  'FUEL  <LB>3’* 

46  PROMPT 

47  STO  06 

48  RCL  07 

49  'PT  <SHP>=’* 
58  PROMPT 


% 


51  STO  07 

52  RCL  08 

53  -HENG=?" 

54  PROMPT 

55  STO  08 

56  RCL  31 

57  'TANDEM’' 

58  PROMPT 

59  STO  31 
68*LBL  'HG' 

61  RCL  01 

62  .887 

63  YtX 

64  4.975 

65  * 

66  STO  09 
67*LBL  'STT' 

68  RCL  87 

69  .080145 
78  * 

71  EtX 

72  60.127 

73  * 

74  STO  18 
?5*L8l  'Sb' 

76  RCL  09 

77  .000845 

78  * 

79  EtX 

80  426.378 

81  * 

82  STO  11 
83*LBL  'HI' 

84  RCL  02 

85  .08539 

86  * 

87  EtX 

88  707.174 

89  * 

90  STO  12 

91  STO  29 
92*LBL  'W6A' 

93  RCL  07 

94  .91 

95  * 

96  348 

97  ♦ 

98  STO  17 

99  CF  21 

100  'ACTUT  OR  R/S* 


101  AVIEU 

102  PSE 

103  SF  21 

104  'ENC  HT<E>=’“ 

185  PROMPT 

186  STO  17 

187  ST*  29 
188*LBL  'H2A' 

109  RCL  09 

110  LH 

111  324.55 

112  * 

113  3021.51 

114  - 

115*LBL  -H2B- 

116  RCL  18 

117  2.83 

118  * 

119  ♦ 

120  18.0 
121  - 

122  STO  13 

123  ST*  29 
124*LBL  'H3' 

125  RCL  11 

126  2.9818 

127  * 

128  1321.921 

129  - 

130  STO  14 

131  ST*  29 

132  RCL  31 

133  X<=8’ 

134  GTO  'H4' 

135  8 

136  STO  10 

137  STO  13 

138  RCL  09 

139  .880041 

140  * 

141  EtX 

142  567.688 

143  ♦ 

144  STO  11 

145  RCL  12 

146  2 

147  * 

148  STO  12 

149  STO  29 

150  RCL  07 


151  .008198 

152  * 

153  EtX 

154  565.587 

155  * 

156  STO  17 

157  ST*  29 

158  RCL  11 

159  LN 

168  3467.291 
161  * 

162  22118.298 

163  - 

164  STO  14 

165  ST*  29 
166*LBL  'H4' 

167  RCL  09 

168  .000841 

169  * 

170  EtX 

171  258.358 

172  • 

173  STO  15 

174  ST*  29 

1 75*LBL  -H5- 

176  RCL  09 

177  .2041 

178  * 

179  1.136 

180  YtX 

181  .014 

182  * 

183  STO  16 

184  ST*  29 
185*LBL  'H6B' 

186  RCL  07 

187  .959 

188  YtX 

189  .999 
198  * 

191  STO  18 

192  CF  21 

193  'ACTHT  OP  P/'S* 

194  AVIEH 

195  PSE 

196  SF  21 

197  'TRAN  WT<Z>=?' 

198  PROMPT 

199  STO  18 

200  ST*  79 


20UL8L  -N6C- 

251  16744.967 

202  RCL  06 

252  * 

203  6.5 

253  188666 

204  / 

254  - 

205  -.0566 

255  .536 

206  YtX 

256  YtX 

207  454.619 

257  1.9 

208  * 

258  * 

209  STO  19 

259  STO  25 

210  ST*  29 

260  ST+  29 

2IULBL  -H7* 

261*LBL  -M13- 

212  RCL  89 

262  RCL  11 

213  1.224 

263  .159 

214  YtX 

264  * 

215  .00334 

265  RCL  03 

216  « 

266  18.11 

217  STO  20 

267  * 

218  ST ♦  29 

268  ♦ 

219*L8L  ‘M8* 

269  STO  26 

220  139.0 

278  ST*  29 

221  STO  21 

271*LBL  -U14- 

222  ST*  29 

272  RCL  11 

223*LBL  -H9- 

273  LH 

224  RCL  07 

274  117.771 

225  LN 

275  * 

226  68.266 

276  710.594 

227  * 

277  - 

228  387.598 

278  STO  27 

229  - 

279  ST*  29 

238  STO  22 

280*LBL  'Mi  5’ 

231  ST*  29 

281  RCL  03 

232*LBL  "HI 0“ 

282  3.49 

233  RCL  09 

283  * 

234  1.863 

284  72 

235  YtX 

285  - 

236  .000600663 

286  RCL  11 

23?  * 

287  .111 

238  STO  23 

288  * 

239  ST*  29 

289  ♦ 

240*LBL  -Mll- 

290  STO  28 

241  RCL  11 

291  -HEH  Me' 

242  .539 

292  ST*  29 

243  YtX 

293  -REV  We=* 

244  9.78 

294  ARCL  29 

245  * 

295  flVIEH 

246  STO  24 

296  RCL  29 

247  ST*  29 

297  STO  01 

248*LBL  -M12- 

298  -FUEL  HT- 

249  RCL  07 

299  RCL  06 

250  LN 

300  ST*  29 

HV 

351  PI 

301  -CARGO- 

382  RCL  85 

352  * 

303  ST*  29 

353  -DENSITY 

304  -PEOPLE  MT- 

354  .8823769 

385  RCL  84 

355  * 

386  -NEW  MG- 

356  RCL  33 

30?  ST*  29 

357  Xt2 

308  *HG=* 

358  * 

389  flRCL  29 

359  SORT 

310  flVIEM 

368  -8- 

311  XE8  -PT* 

361  .97 

312  -REV  PT=* 

362  * 

313  flRCL  8? 

363  1/X 

314  flVIEM 

364  RCL  29 

315  ABV 

365  1.5 

316  RCL  89 

366  YtX 

317  RCL  29 

367  * 

318  - 

368  RCL  87 

319  RCL  29 

369  + 

320  / 

370  550 

321  100 

371  / 

322  * 

372  STO  07 

323  *ER«>=* 

373  RTN 

324  flRCL  X 

374  END 

325  PROMPT 

326  RCL  29 
32?  STO  09 
328  CTO  *M1* 
329*LBL  -PT* 
338  . 125 

331  RCL  35 

332  * 

333  RCL  34 

334  * 

335  -CdO" 

336  .01 
33?  * 

338  ’DENSITY* 

339  .0023769 

340  * 

341  RCL  37 

342  3 

343  YtX 

344  • 

345  RCL  33 

346  4 

347  YTX 

348  * 

349  STO  07 

350  2 


70 


END 
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